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A Conformance  Test  for  FDDI  Medium  Access  Control  (MAC) 


Zuqiu  Liu 
and 

William  E.  Burr 

This  report  describes  a conformance  test  for  the  Fiber  Distributed  Data  Interface  (FDDI) 
Medium  Access  Control  (MAC)  standard  [1].  FDDI  is  a layered  OSI  protocol  consisting 
of  four  sublayers  at  the  data  link  or  physical  layers  as  illustrated  in  Figure  1.  At  the  lowest 
level  is  Physical  Medium  Dependent  (PMD)  standard  [2],  which  is  concerned  primarily  with 
the  optical  fiber  interface  to  FDDI  stations.  The  Physical  Layer  Protocol  (PHY)  standard 
[3]  deals  with  the  coding  of  data  and  control  symbols.  The  MAC  sublayer,  which  is  a data 
link  layer  protocol,  is  concerned  with  the  definition  of  frames  (packets),  and  the  token 
passing  mechanism  used  to  grant  permission  to  transmit  frames.  Figure  2 illustrates  the 
MAC  frame  and  token  formats.  MAC  interfaces  with  a Logical  Link  Control  (LLC) 
sublayer,  typically  IEEE  802.2,  above  it.  Finally  Station  Management  (SMT)  [4]  is  a vertical 
management  sublayer,  which  manages  the  other  three  sublayers  and  provides  an  interface 
to  the  OSI  System  Management  Application  (SMAP)  process. 

Together  these  four  sublayers  specify  the  physical  interface  and  data  link  protocol  for  a 
node  in  a 100  Mbit/s  fiber  optic  token  ring  LAN  network,  which  supports  OSI 
communications.  It  is  similar  to  the  IEEE  802.3,  802.4  and  802.5  protocols  in  its  services, 
and  is  logically  interchangeable  with  them  under  the  802.2  LLC. 

ISO  9646,  OSI  Conformance  Testing  Methodology  and  Framework,  is  the  basis  for 
conformance  testing  of  OSI  protocol  standards.  It  consists  of  five  documents,  all  draft 
international  standards: 

Part  1:  General  Concepts 

Part  2:  Abstract  Test  Suite  Specification 

Part  3:  The  Tree  and  Tabular  Combined  Notation  (TTCN) 

Part  4:  Test  Realization 

Part  5:  Requirements  on  Test  Laboratories  and  Clients  for  the  Conformance 

Assessment  Process 

In  this  conformance  testing  methodology,  each  OSI  standard  should  contain  a protocol 
miptementation  conformance  statement  (PICS)  proforma,  which  specifically  enumerates  the 
features,  requirements,  and  options  of  the  standard.  The  supplier  of  an  implementation 
wider  test  (lUT)  is  then  required  to  complete  a PICS  questionnare  or  checklist.  The 
completed  PICS  checklist  then  specifically  states  which  of  those  features  and  options  of  the 
protocol  have  been  implemented.  Tests  are  prepared  in  the  form  of  an  abstract  test  suite, 
using  the  TTCN  language  specified  in  DIS  9646-3.  There  should  be  a test  or  tests  for  every 
feature  and  option  specified  in  the  PICS  proforma. 

FDDI  MAC  is  specified  in  the  equivelent  ANSI  X3. 137-1988  and  ISO  9314-2  standards. 
It  was  conceived  and  developed  before  the  development  of  DIS  9646,  without  any  thought 
for  conformance  testing.  It  does  not  contain  a PICS  proforma.  The  traditional  means  for 
identifying  the  requirements  of  a standard  is  the  occurrence  of  the  verb  "shall."  In  a layered 


standard,  such  as  MAC,  which  can  only  be  tested  in  conjunction  with  other  layers,  it  is 
difficult  or  impossible  to  isolate  the  particulars  of  many  of  the  layer  interfaces,  and  a simple 
enumeration  of  the  "shalls"  is  not  particularly  helpful  to  identify  the  requirements  for  a 
meaningful  test. 

ISO  DIS  9646  recognizes  that  the  actual  requirements  of  a protocol  standard  are  often 
contained  largely  in  formal  state  machine  definition  tables,  and  this  is  the  case  with  FDDI 
MAC.  In  the  absence  of  a PICS,  the  tester  is  left  to  infer  which  properties  of  the  state 
machine  are  essential  requirements  of  the  standard  and  which  properties  are  simply  artifacts 
of  the  state  machine  definition.  Ideally,  the  MAC  standard  and  state  machine  would  be 
specified  so  that  everything  which  must  be  specified  for  interoperability  or  performance  is 
fully  specified,  but  only  those  things  are  specified.  The  MAC  standard  would  then  not 
constrain  implementations  any  more  than  strictly  necessary. 

For  state  machine  definitions  as  complex  as  MAC,  this  sort  of  perfection  is  very  elusive. 
For  example  there  is  a considerable  debate  among  the  implementors  of  FDDI  about 
whether  the  state  machine  requires  that  a station  which  strips  a frame  must  begin  stripping 
by  the  end  of  the  Source  Address,  or  if  some  later  point  will  do.  If  the  former  is  the 
correct  reading  of  the  literal  MAC  state  machine,  should  that  be  considered  a requirement 
of  the  standard  or  an  incidental  property  of  the  state  machine?  The  text  from  which  the 
inference  about  when  stripping  must  begin  is  less  than  crystal  clear.  There  is  no 
interoperability  requirement  to  begin  stripping  so  soon,  since  MACs  must  correctly  handle 
packet  fragments  of  any  length.  There  may,  however,  be  performance  implications 
depending  upon  the  design  assumptions  of  other  network  stations.  If  an  FDDI  MAC  PICS 
clearly  stated  the  conformance  requirement  for  stripping,  this  issue  would  be  settled. 

In  this  test  suite,  the  authors  have  largely  avoided  such  issues,  or  at  least  not  intentionally 
tried  to  settle  them.  No  attempt  was  made  to  define  a PICS  for  FDDI  MAC  ( which,  if 
provided,  ought  to  settle  the  question  posed  above).  If  these  tests  become  the  definitive 
test  for  FDDI  MAC  conformance,  they  would,  however,  probably  inadvertently  make  such 
choices  on  some  points.  It  would  be  well  for  the  FDDI  standards  developers  to  explicitly 
prepare  a PICS  for  FDDI  MAC,  to  provide  a more  explicit  forum  for  addressing  such 
issues,  rather  than  to  leave  them  to  the  imiagination  of  testers. 

If  the  daunting  task  of  preparing  a PICS  for  MAC  was  not  attempted,  how  did  the  authors 
determine  what  was  to  be  tested?  The  method  used  was  to  go  through  the  state  machine 
specifications  and  attempt  to  devise  a test  which  forces  the  state  machine  to  go  through 
every  defined  state  and  transition,  and  to  observe  what  could  be  externally  observed.  It 
should  be  possible  to  work  backwards  from  the  test  observations,  to  construct  a sort  of 
PICS.  This  would  not  be  a complete  PICS,  because  a lower  level  remote  test  cannot  test 
every  property  of  MAC,  but  it  would  be  a start.  A PICS  should,  however,  be  developed  as 
a conscious  act  by  the  group  which  developed  the  standard. 

DIS  9646  describes  four  abstract  test  methods: 

(a)  Local 

(b)  Distributed  (external) 

(c)  Coordinated  (external) 
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(d)  Remote  (external) 


ISO  DIS  9646  also  defines  both  lower  and  upper  tests,  requiring  test  procedures  to  be  run 
using  a Point  of  Control  and  Observation  (PCO)  either  above  or  below  the  lUT  in  the 
protocol  stack.  It  is  not  practical  to  control  what  resides  above  FDDI  MAC  in  an  arbitrary 
lUT,  at  least  not  at  any  point  below  the  applications  layer.  The  MAC  to  ULC  interface  is 
not  available  to  the  tester,  and  several  of  the  intervening  layers  may  be  either  unknown  or 
have  many  different  options.  Although  there  is  no  specification  in  the  standard  of  which 
features  of  the  MAC  to  LLC  interface  may  be  optional,  an  FDDI  station  is  not  required 
to  implement  those  it  does  not  use.  Therefore,  a systematic  upper  level  test  of  FDDI  MAC 
is  impractical. 

The  MAC  to  PHY  interface  is  also  not  directly  accessible  to  the  tester,  however  PHY  and 
PMD  are  relatively  simple,  with  few  options,  so  it  is  possible  to  produce  a lower  level  test 
which  produces  a predictable  stimulus  to  MAC  at  the  PHY  to  MAC  interface.  Figure  3 
illustrates  the  practical  PCO’s  for  testing  FDDI  MAC  and  SMT.  MAC  Protocol  Data  Units 
(PDUs)  are  frames  (see  Figure  2).  The  MAC  test  uses  a Lower  Level  Test  with  the 
Remote  pAternal  Test  Method  at  the  MAC  PDU  level.  The  MAC  test  consists  only  of 
MAC  PDUs  sent  to  the  FDDI  input  port.  No  assumptions  are  made  about  what  may  reside 
above  FDDI  in  the  total  protocol  stack,  so  there  is  no  way  to  induce  any  behavior  from 
layers  above  FDDI.  MAC,  itself,  does  not  originate  any  frames  except  the  special  Beacon 
and  Claim  frames,  used  to  initialize  the  FDDI  ring.  MAC  includes  no  "loop-back"  function 
which  would  allow  a test  of  its  ability  to  correctly  receive  a frame  addressed  to  it,  and 
respond  by  transmitting  a correct  response  frame. 

SMT,  however,  operates  on  two  levels.  The  lower  level  of  SMT,  Connection  Management 
(CMT),  uses  line  state  services  provided  by  PHY,  at  a level  below  where  MAC  frames  are 
apparent,  and  would  require  a PCO  at  the  PHY  level.  The  higher  level  of  SMT,  which  uses 
MAC  PDUs,  would  be  tested  with  frames  in  a manner  somewhat  similar  to  MAC. 
However,  since  SMT  does  receive  and  orignate  MAC  frames,  it  is  possible  to  test  most  of 
the  frame  processing  capabilities  of  MAC  by  sending  frames  to  SMT  and  observing  the 
SMT  originated  response  frames.  A systematic  conformance  test  of  both  MAC  and  SMT 
would  begin  with  the  CMT  test,  followed  by  a MAC  test,  and  then  a test  of  the  SMT  Frame 
Services. 

In  effect,  this  test  is  primarily  a test  of  a MAC’s  ability  to  coexist  in  an  FDLI  network  and 
not  interfere  with  the  proper  operation  of  the  network.  It  assumes  the  existence  of  a 
special  FDDI  test  instrument  with  all  the  capabilities  of  any  FDDI  station  plus  many  others. 
In  particular,  the  tester  requires  the  ability  to  generate  a number  of  errors  or  unusual 
conditions,  which  a normal  FDDI  station  would  not  be  designed  to  generate.  For  example, 
the  tester  must  be  able  to  generate  Frames  with  erroneous  Frame  Check  Sequences,  or 
remove  tokens  from  the  ring,  or  strip  frames  which  it  did  not  originate,  which  are  all 
violations  of  the  FDDI  protocol.  These  functions  are  required  of  the  tester  to  test  the 
response  of  the  MAC  under  test  to  specific  error  conditions.  No  FDDI  tester  is  yet 
available  for  use  to  execute  the  tests  and  no  actual  FDDI  implementations  have  yet  been 
tested.  It  is  expected  that  FDDI  testers  will  become  commercially  available,  and  it  is  hoped 


3 


that  these  testers  will  generally  be  implemented  with  microprocessors  for  which  a C 
compiler  is  available. 

The  FDDI  MAC  conformance  test  is  written  in  the  Tree  and  Tabular  Combined  Notation 
(TTCN)  defined  in  ISO  DIS  9646-3.  Two  representations  of  TTCN  are  defined,  a graphical 
form,  intended  to  be  intelligible  to  humans  and  a machine  processable  form,  as  illustrated 
in  Figure  4.  The  MAC  test  was  written  in  the  graphical  form  of  TTCN  which  has  been 
automatically  converted  by  the  TTCN  workbench  developed  by  the  University  of  Ottawa 
[5]  to  the  machine  processable  form  of  TTCN.  That  machine  processable  TTCN  form  of 
the  test  was,  in  turn,  processed  by  a TTCN  to  C translator  written  by  David  Su  of  the 
National  Institute  of  Standards  and  Technology  [6],  which  translates  a TTCN  test  into  a C 
program,  as  illustrated  in  Figure  5.  The  correctness  of  the  syntax  of  that  C program  has 
in  turn,  been  verified  by  compiling  it  on  the  SUN  UNIX  C compiler.  A special  FDDI 
tester  with  a C compiler  would  be  required  to  execute  the  MAC  conformance  test.  No  such 
tester  is  yet  commercially  available,  however  the  authors  expect  that  FDDI  testers  will 
become  available,  as  they  have  for  other  standards.  Several  tester  specific  routines  which 
are  called  by  the  C test  program  must  be  coded  for  that  tester  to  execute  the  conformance 
test. 

Coding  the  conformance  test  in  the  TTCN  language,  then  using  a translator  to  convert  that 
to  C is  a practical  way  to  make  a consistent,  portable  test.  Most  testors  will  probably  use 
a microprocessor  for  which  a C compiler  exists.  Hand  translation  of  the  TTCN  test 
specification  to  some  compiler  or  assembly  language  for  each  tester  is  likely  to  be 
inconsistent. 

Both  the  workbench  and  the  compiler  implement  somewhat  different  subsets  of  the  TTCN 
language,  and  neither  are  totally  current  with  ISO  DIS  9646.  The  MAC  conformance  test, 
then,  is  coded  in  the  intersection  of  the  TTCN  subsets  implemented  by  the  workbench  and 
compiler.  To  the  extent  that  these  accurately  parse  TTCN,  there  has  been  a fairly  strong 
check  of  the  correctness  of  the  syntax  of  the  test.  The  TTCN  language  is  still  evolving,  and 
the  test  presented  here  may  not  totally  conform  to  the  final  version  of  the  standard  when 
it  is  approved. 

Figure  6 illustrates  the  components  of  a complete  test  suite  for  FDDI  protocols  MAC  and 
SMT  protocols  (PMD  and  PHY  are  not  considered  suitable  for  the  TTCN  language). 
SMT  is  not  yet  final  and  only  the  MAC  test  has  been  written.  Figure  7 illustrates  the 
structure  of  the  MAC  test.  Tliere  are  seven  Test  Groups: 

Basic,  which  tests  the  ability  of  the  lUT  MAC  to  transmit,  receive,  repeat  and  strip 
frames. 

Claim  Token,  which  tests  the  lUTs  ability  to  participate  in  the  Claim  Token  Process 
used  to  initialize  the  network.  The  tester  generates  cases  where  the  MAC  under  test 
should  win  the  claim,  and  cases  where  it  should  lose. 

Beaconing,  which  tests  lUTs  participation  in  the  Beacon  Process,  which  is  a test  of 
ring  continuity. 
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Timed  Token  Rotation  Protocol,  which  tests  the  rLTr s response  to  the  token  rotation 
delay.  When  the  token  is  late,  the  lUT  must  not  use  it  for  certain  classes  of  traffic. 

Monitoring,  which  tests  the  lUT’s  ability  to  detect  certain  network  error  conditions 
(basically  lost  token  or  station  stuck  transmitting  conditions)  and  reinitialize  the  ring. 

Frame  Error  Detection,  which  tests  the  ability  of  the  lUT  to  detect  a number  of  errors 
in  frames,  such  as  bad  Frame  check  sequences,  and  respond  appropriately. 

Token  Error  Detection,  which  tests  the  ability  of  the  lUT  to  detect  incorrectly  formed 
tokens. 

Appendix  A is  the  TTCN  graphical  representation  of  the  test.  Appendix  B is  the  machine 
processable  version  from  the  TTCN  workbench,  and  Appendix  C is  the  C program  version 
generated  by  the  TTCN  compiler.  Appendix  D is  an  example  of  implementations  of  the 
host  specific  subroutines  which  must  be  modified  or  recoded  in  terms  of  the  timer  and  I/O 
services  provided  by  the  particular  tester  used. 

While  a complete,  systematic  test  of  FDDI  MAC  implementations  is  probably  not  possible 
without  an  accessible  MAC  to  LLC  interface  and  a higher  level  MAC  conformance  test,  this 
test  does  provide  a good  degree  of  assurance  that  the  MAC  can  participate  in  an  FDDI 
network  without  harming  the  network,  and  react  properly  to  various  network  conditions 
which  may  arise.  This,  in  conjunction  with  some  more  general  application  level  test  of  the 
complete  station,  such  as  a file  transfer  test,  which  exercise  the  MAC  to  LLC  interface, 
should  provide  a reasonable  assurance  that  a MAC  implementation  conforms  to  the  FDDI 
standard. 
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Figure  2.  FDDI  MAC  Frame  and  Token  Formats 
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Figure  3.  The  Remote  Test  Method 
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Figure  5.  TTCN's  Functions 
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Figure  6.  The  FDDI  Test  Suite  Structure 
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Figure  7.  Structure  of  the  MAC  Test  Cases 
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User  Type  Definitions 

Name 

Base  Type 

Definition 

Comments 

Symbol 

BITSTRING 

BITSTRING [5] 

The  smallest  signaling 

# 

element  used  by  MAC. 

Sstring 

BITSTRING 

(' llllO'B, 

Symbolstring (Sstring)  is 

# 

' OlOOl'B, 

the  TTCN  new  type 

# 

' lOlOO'B, 

defined  by  user. 

# 

' lOlOl'B, 

# 

' OlOlO'B, 

# 

' OlOll'B, 

# 

' OlllO'B, 

# 

' Ollll'B, 

# 

' lOOlO'B, 

# 

' lOOll'B, 

# 

' lOllO'B, 

# 

' lOlll'B, 

# 

' IIOIO'B, 

# 

' llOll'B, 

# 

' lllOO'B, 

# 

' lllOl'B, 

# 

' OOOOO'B, 

# 

'lllll'B, 

# 

' OOlOO'B, 

# 

' IIOOO'B, 

# 

'lOOOl'B, 

# 

' lOlOl'B, 

# 

' OlOlO'B, 

# 

' OlOll'B) 

12 
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Test  Suite  Parameters 

Name 

Type 

PICS/PIXIT 

Comments 

lUT  Address 

INTEGER 

The  address  of  Station 

# 

Under  Test . 

Teste  r_Addr e s s 

INTEGER 

The  address  of  Tester. 

# 

Get  this  value  from 

# 

Tester . 

TTRT 

INTEGER  (4000 

The  operative  Target 

# 

TO  167772) 

Token  Rotation  Time. 

T Rec^Tester 

INTEGER  (4000 

Tester's  Requested  TTRT. 

# 

TO  167772) 

T Req_IUT 

INTEGER  (4000 

lUT's  Requested  TTRT. 

# 

TO  167772) 

T Bid  Max 

INTEGER  (4000 

Highest  Bidding  Value  of 

# 

TO  167772) 

Tester  in  Claim  Token 

# 

Process . 

T Bid  Min 

INTEGER  (4000 

Lowest  Bidding  Value  of 

# 

TO  167772) 

Tester  in  Claim  Token 

# 

process . 

T FCS  Tramt 

Sstring 

FCS  field  for  the  frame 

# 

transmitted. 

T FCS  Rev 

Sstring 

FCS  field  for  the  frame 

# 

received. 

18 
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Global  Constants 

Name 

Type 

Value 

Comments 

T_Max 

INTEGER 

167772 

The  maximum  value 

# 

(default  value)  of  TRT. 

T Min 

INTEGER 

4000 

The  minimum  value 

# 

(default  value)  of  TRT. 

SO 

Sstring 

' llllO'B 

Data  Symbol  0 

SI 

Sstring 

' OlOOl'B 

Data  Symbol  1 

S2 

Sstring 

' lOlOO'B 

Data  Symbol  2 

S3 

Sstring 

' lOlOl'B 

Data  Symbol  3 

S4 

Sstring 

' OlOlO'B 

Data  Symbol  4 

S5 

Sstring 

' OlOll'B 

Data  Symbol  5 

S6 

Sstring 

' OlllO'B 

Data  Symbol  6 

SI 

Sstring 

'Ollll'B 

Data  Symbol  7 

S8 

Sstring 

' lOOlO'B 

Data  Symbol  8 

S9 

Sstring 

' lOOll'B 

Data  Symbol  9 

sA 

Sstring 

' lOllO'B 

Data  Symbol  A 

SB 

Sstring 

' lOlll'B 

Data  Symbol  B 

SC 

Sstring 

' IIOIO'B 

Data  Symbol  C 

sD 

Sstring 

' llOll'B 

Data  Symbol  D 

SE 

Sstring 

' lllOO'B 

Data  Symbol  E 

SF 

Sstring 

'lllOl'B 

Data  Symbol  F 

SQ 

Sstring 

' OOOOO'B 

Line  State  Symbol  Q 

SI 

Sstring 

' lllll'B 

Line  State  Symbol  I 

SH 

Sstring 

'OOlOO'B 

Line  State  Symbol  H 

SJ 

Sstring 

'IIOOO'B 

Starting  Delimiter  J 

SK 

Sstring 

'lOOOl'B 

Starting  Delimiter  K 

ST 

Sstring 

'lOlOl'B 

Ending  Delimiter  T 

SR 

Sstring 

'OlOlO'B 

Reset  Symbol  R 

SS 

Sstring 

' OlOll'B 

Set  Symbol  S 

S01234567 

HEXSTRING 

'F269552DCF'H 

The  special  data  pattern 

# 

for  INFO  field. 

SIIQIIIIIIIII 

HEXSTRING 

' FFCIFFFFFFFFFF 

A Invalid  Symbol  in 

#1111 

FFFFFF'H 

Preamble  Field. 

S0Q234567 

HEXSTRING 

'F029552DCF'H 

A Invalid  Symbol  in  the 

# 

data  pattern  of  INFO 

# 

field. 

S0I234567 

HEXSTRING 

'F7E9552DCF'H 

A Idle  Symbol  in  the  data 

# 

pattern  of  INFO  field. 

S0T234567 

HEXSTRING 

'F569552DCF'H 

A Symbol  (not  Idle  or 

# 

data)  in  the  data  pattern 

# 

of  INFO  field. 

soooooooo 

HEXSTRING 

'F7BDEF7BDE'H 

FCS  in  errors 

SQH 

BITSTRING 

'OOOOOOOIOO'B 

A symbol  secjuence  (not 

# 

Idle(s)  or  nn)  after  K in 

# 

FC. 

SJK 

BITSTRING 

' IIOOOIOOOI'B 

Starting  Delimiter. 

SJQ 

BITSTRING 

' IIOOOOOOOO'B 

A Invalid  Symbol  after  J 

# 

in  SD . 

SJI 

BITSTRING 

' llOOOlllll'B 

A Idle  Symbol  after  J in 

# 

SD. 

SIR 

BITSTRING 

' llllllOOOl'B 

Other  Symbol  (not  K 

# 

symbol)  before  K in  SD. 

Continued  on  next  page 
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Continued  from  previous  page. 


Name 

Type 

Value 

Comments 

SQT 

BITSTRING 

' OOOOOIOIOI'B 

A Invalid  Symbol  in  ED  of 

# 

Token . 

STT 

BITSTRING 

' lOlOllOlOl'B 

Two  terminate  symbols  in 

# 

ED  of  Token. 

SIT 

BITSTRING 

' llllllOlOl'B 

A Idle  Symbol  in  ED  of 

# 

Token . 

SOT 

BITSTRING 

'IIIIOIOIOI'B 

Any  symbol (not  Idles  or 

# 

T)  in  ED  of  Token. 

SRRR 

BITSTRING 

' 01010010100101 

II 

> 

II 

o 

II 

# 

O'B 

SRSS 

BITSTRING 

' 01010010110101 

E=R,  A=S,  C=S 

# 

I'B 

SRQR 

BITSTRING 

' 01010000000101 

E=R,  A=Q(a  Invalid 

# 

O'B 

Symbol) , C=R 

SSSR 

BITSTRING 

' 01011010110101 

E=S,  A=S,  C=R 

# 

O'B 

SSRR 

BITSTRING 

' 01011010100101 

II 

CO 

> 

II 

o 

II 

# 

O'B 

SSSS 

BITSTRING 

' 01011010110101 

E=S,  A=S,  C=S 

# 

I'B 

P 16 

OCTETSTRING 

' FFFFFFFFFFFFFF 

The  Preamble  field  in 

# 

FFFFFF'H 

frame  transmitted  by 

# 

Tester . 

Test  Suite  Variables 

Name 

Type 

Value 

Comments 

a 

INTEGER 

0 

A variable  for  the  test 

# 

suite . 

PCO  Declarations 

Name 

Role 

L 

# 

The  Point  of  Control  and  Observation  of  lower  tester  for 
MAC,  CMT  or  SMT  frame  tests . 

20 
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Data  Type  Declaratiorx 

PDU  Name:  DATA 

Comments : General  MAC  Data 

Frame 

Protocol  Control  Information 

Field  Name 

Type 

Comments 

PA 

Sstring [16] 

Preamble 

SD 

Sstring [2 ] 

Starting  Delimiter 

FC 

Sstring [2 ] 

Frame  Control 

DA 

Sstring [12] 

Destination  Address 

SA 

Sstring [12] 

Source  Address 

INFO 

Sstring [8956] 

INFOrmation 

FCS 

Sstring [8] 

Frame  Check  Sequence 

ED 

Sstring [1] 

End  Delimiter 

FS 

Sstring [3] 

Frame  Status 

Data  Type  Declaration 

PDU  Name:  TOKEN 

Comments:  MAC  Nonrestricted 

Token 

Protocol  Control  Information 

Field  Name 

Type 

Comments 

PA 

Sstring [16] 

Preamble 

SD 

Sstring [2] 

Starting  Delimiter 

FC 

Sstring [2] 

Frame  Control 

ED 

Sstring [2] 

End  Delimiter 

Data  Type  Declaration 

PDU  Name : DATA_InvLen 

Comments:  The  MAC  frame  with 
the  Invalid  Data 
Length 

Protocol  Control  Information 

Field  Name 

Type 

Comments 

PA 

Sstring [16] 

Preamble 

SD 

Sstring [2] 

Starting  Delimiter 

FC 

Sstring [2] 

Frame  Control 

DA 

Sstring [12] 

Destination  Address 

SA 

Sstring [12] 

Source  Address 

INFO 

Sstring [8955] 

INFOrmation  field  with  the 

# 

Invalid  Data  Length. 

FCS 

Sstring [8] 

Frame  Check  Sequence 

ED 

Sstring [1] 

End  Delimiter 

FS 

Sstring [3] 

Frame  Status 

22 
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Data  Type  Declaration 

PDU  Name : DATA_OverMaxLen 

Comments : The  MAC  frame 

whose  symbol  times 
is  greater  than 

TVX 

Protocol  Control  Information 

Field  Name 

Type 

Comments 

PA 

Sstring [16] 

Preamble 

SD 

Sstring [2] 

Starting  Delimiter 

FC 

Sstring [2] 

Frame  Control 

DA 

Sstring [12] 

Destination  Address 

SA 

Sstring [12] 

Source  Address 

INFO 

Sstring[8958] 

INFOrmation  field.  This 

# 

frame's  symbol  time  is 

# 

greater  than  TVX. 

FCS 

Sstring [8] 

Frame  Check  Sequence 

ED 

Sstring [1] 

End  Delimiter 

FS 

Sstring [3] 

Frame  Status 

Data  Type  Declaration 

PDU  Name:  CLAIM 

Comments : MAC  Claim  Frame 

Protocol  Control  Information 

Field  Name 

Type 

Comments 

PA 

Sstring [16] 

Preamble 

SD 

Sstring [2] 

Starting  Delimiter 

FC 

Sstring [2] 

Frame  Control 

DA 

Sstring [12] 

Destination  Address 

SA 

Sstring [12] 

Source  Address 

INFO 

Sstring [8956] 

INFOrmation 

FCS 

Sstring [8] 

Frame  Check  Sequence 

ED 

Sstring [1] 

End  Delimiter 

FS 

Sstring [3] 

Frame  Status 

12 
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Data  Type  Declaration 

PDU  Name:  BEACON 

Comments:  MAC  Beacon  Frame 

Protocol  Control  Infoirmation 

Field  Name 

Type 

Comments 

PA 

Sstring [16] 

Preamble 

SD 

Sstring [2] 

Starting  Delimiter 

FC 

Sstring [2] 

Frame  Control 

DA 

Sstring [12] 

Destination  Address 

SA 

Sstring [12] 

Source  Address 

INFO 

Sstring[8956] 

INFOrmation 

FCS 

Sstring [8] 

Frame  Check  Sequence 

ED 

Sstring [1] 

End  Delimiter 

FS 

Sstring [3] 

Frame  Status 
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Data  Type  Declaration 

PDU  Name:  ECHO_Req 

Comments : SMT  ECHO  request 

Frame 

Protocol  Control  Information 

Field  Name 

Type 

Comments 

PA 

Sstring [16] 

Preamble 

SD 

Sstring [2] 

Starting  Delimiter 

FC 

OCTETSTRING [1] 

Frame  Control 

DA 

OCTETSTRING [6] 

Destination  Address 

SA 

OCTETSTRING [6] 

Source  Address 

Frame  Class 

OCTETSTRING [1] 

To  identify  the  function  of 

# 

the  frame. 

Frame  Type 

OCTETSTRING [1] 

To  designate  the  type  of  the 

# 

frame 

Version  ID 

OCTETSTRING [2] 

The  value  will  not  change 

# 

when  upward  compatible 

# 

changes  are  made  to  the  SMT 

# 

frames . 

Transaction  ID 

OCTETSTRING [4] 

To  be  used  to  pair  SMT 

# 

responses  with  their 

# 

requests . 

Station  ID 

OCTETSTRING [8] 

The  unique  identifier  for  an 

# 

FDDI  station  (or 

# 

concentrator) . 

Pad 

OCTETSTRING [2] 

InfoField  Length 

OCTETSTRING [2] 

The  length  of  the  SMT 

# 

Information  field. 

P a r ame  t e r_Type 

OCTETSTRING [2] 

Parameter__Length 

OCTETSTRING [2] 

The  length  of  the  Echo_data . 

Echo_data 

OCTETSTRING [1168] 

SMT  InfoField 

FCS 

Sstring [8] 

Frame  Check  Sequence 

ED 

Sstring [1] 

Ending  Delimiter 

FS 

Sstring [3] 

Frame  Status 
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Data  Type  Declaration 

PDU  Name:  ECHO_Resp 

Comments : SMT  ECHO  Response 

Frame 

Protocol  Control  Infoimiation 

Field  Name 

Type 

Comments 

PA 

Sstring [16] 

Preamble 

SD 

Sstring [2] 

Starting  Delimiter 

FC 

OCTETSTRING [1] 

Frame  Control 

DA 

OCTETSTRING [6] 

Destination  Address 

SA 

OCTETSTRING [6] 

Source  Address 

Frame_Class 

OCTETSTRING [1] 

To  identify  the  function  of 

# 

the  frame. 

Frame  Type 

OCTETSTRING [1] 

To  designate  the  type  of  the 

# 

frame . 

Version  ID 

OCTETSTRING [2] 

The  value  will  not  change 

# 

when  upward  coirpatible 

# 

changes  are  made  to  the  SMT 

# 

frames . 

Transaction  ID 

OCTETSTRING [4] 

To  be  used  to  pair  SMT 

# 

responses  with  their 

# 

requests . 

Station  ID 

OCTETSTRING [8] 

The  unique  identifier  for  an 

# 

FDDI  station  (or 

# 

concentrator) . 

Pad 

OCTETSTRING [2] 

InfoField  Length 

OCTETSTRING [2] 

The  length  of  the  SMT 

# 

Information  field. 

Parameter_Type 

OCTETSTRING [2] 

Parameter_Length 

OCTETSTRING [2] 

The  length  of  the  Echo_data . 

Echo_data 

OCTETSTRING [1168] 

SMT  InfoField 

FCS 

Sstring [8] 

Frame  Check  Sequence 

ED 

Sstring [1] 

Ending  Delimiter 

FS 

Sstring [3] 

Frame  Status 
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Data  Type  Declaration 

PDU  Name:  DATA_Strip 

Comments:  MAC  Data  Frame 

Stripped 

Protocol  Control  Information 

Field  Name 

Type 

Comments 

PA 

Sstring [16] 

Preamble 

SD 

Sstring [2] 

Starting  Delimiter 

FC 

Sstring [2] 

Frame  Control 

DA 

Sstring [12] 

Destination  Address 

SA 

Sstring [12] 

Source  Address 

INFO 

Sstring [8956] 

INFOirmation 

FCS 

Sstring [8] 

Frame  Check  Sequence 

ED 

Sstring [1] 

Ending  Delimiter 

FS 

Sstring [3] 

Frame  Status 

Data  Type  Declaration 

PDU  Name:  TOKEN_Strip 

Comments : MAC  Nonrestricted 
Token  Stripped 

Protocol  Control  Information 

Field  Name 

Type 

Comments 

PA 

Sstring [16] 

Preamble 

SD 

Sstring [2] 

Starting  Delimiter 

FC 

Sstring [2] 

Frame  Control 

ED 

Sstring [2] 

Ending  Delimiter 

Data  Type  Declaration 

PDU  Name:  IDLE 

Comments : 

Protocol  Control  Information 

Field  Name 

Type 

Comments 

Single Idle 
# 

Sstring [1] 

A single  Idle  symbol  is  sent 
by  Tester. 

22 
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Timer  Declarations 

Timer  Type  Name 

Duration 

Comments 

TVX 

2621  us 

Valid  Transmission  Timer. 

# 

This  is  the  default  value  of 

# 

timeout . 

TRT 

TTRT  us 

Token-Rotation  Timer, 

27 
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Test  Case  Dynamic 

Behaviour 

Reference : FDDI/MAC/BASIC/FrameTransmit 

Identifier:  FrameTransmit 

Purpose:  Test  MAC  Frame  Transmission 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

FrameTransmit 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

!ECHO  Req 

ECHO__Req_Tl 

Tester' s 

# 

ECHO  Reques 

# 

t Frame 

# 

(DA=IUT 

# 

Address)  . 

! TOKEN 

TOKEN_Tl 

Tester 

# 

releases 

# 

Token  to 

# 

lUT. 

7ECHO  Resp 

ECHORespRl 

lUT  sends 

# 

ECHO  Respon 

# 

se  back. 

? TOKEN 

TOKEN_Rl 

P 

Tester 

# 

receives 

# 

Token  from 

# 

lUT. 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

7 OTHERWISE 

F 

7 TIMEOUT  TRT 

F 

Extended  Comments : 

22 
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Test  Case  Dynamic  Behaviour 

Reference : FDDI/MAC/BASIC/FrameRepeat 

Identifier;  FrameRepeat 

Purpose;  Test  MAC  Frame  Repeating 

Defaults  Reference; 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

FrameRepeat 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

!DATA 

DATA_T1 

Sending 

# 

Tester 

# 

Frame  (DAOI 

# 

* 

UT  Address) 

?DATA 

DATA_R1 

P 

Tester  gets 

# 

the  Tester 

# 

frame  repea 

# 

ted  (A=R; 

# 

C=R;  E=R)  . 

70THERWISE 

F 

? TIMEOUT  TRT 

I 

Test  Case  Dynamic  Behaviour 

Reference ; FDDI/MAC/BASIC/FrameReceive 

Identifier;  FrameReceive 

Purpose;  Test  MAC  Frame  Receiving 

Defaults  Reference; 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

FrameReceive 

+FDD I / INITCONNECT 

Initializin 

# 

g Connectio 

n 

!DATA 

DATA  T2 

Tester 

sends  the 

# 

frame (DA=IU 

# 

T Address)  . 

7DATA 

DATA  R2 

P 

Tester  gets 

# 

the  frame 

# 

(A=S;  C=S; 

# 

E=R)  receiv 

# 

ed  by  lUT. 

7 OTHERWISE 

F 

7 TIMEOUT  TRT 

F 

22 
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Test  Case  Dynamic 

Behaviour 

Reference : FDDI /MAC/BAS IC/FrameSt rip 

Identifier:  FrameStrip 

Purpose:  Test  MAC  Frame  Stripping 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

FrameStrip 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n . 

! ECHO_Req 

ECHO_Req_Tl 

Tester 

# 

sends  SMT 

# 

ECHO  Reques 

# 

t frame. 

! TOKEN 

TOKEN_Tl 

and  then 

# 

issues 

# 

Token . 

?ECHO  Resp 

ECHO_Re  sp_Rl 

lUT  sends 

# 

SMT  ECHO 

# 

Response 

# 

frame. 

? TOKEN  START  TRT 

TOKEN_Rl 

and  issues 

# 

Token  to 

# 

Tester . 

!ECHO  Resp 

ECHO  Resp_Tl 

Tester 

# 

received 

# 

ECHO  Respon 

# 

se  and 

# 

returns 

# 

this  frame 

# 

to  lUT. 

?DATA  Strip 

DATA_Strip_R6 

P 

lUT  strips 

# 

this  frame. 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

? OTHERWISE 

I 

? TIMEOUT  TRT 

I 

70THERWISE 

I 

7 TIMEOUT  TRT 

I 

12 
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Test  Case  Dynamic  Behaviour 

Reference : FDDI/MAC/CLAIMTOKEN/TesterWinClaim 

Identifier:  TesterWinClaim 

Purpose:  Test  MAC  Claim  Token  Process  1:  Tester  wins  Claim  Token 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

TesterWinClaim 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

7TIMEOUT  TVX(a:=l) 

A 

Tester 

# 

holds  Token 

# 

and  sends 

# 

Idle  symbol 

# 

s until  TVX 

# 

expires . 

!IDLE 

IDLE_I 

[a=0] 

GOTO  A 

START  TRT,  TRTclaim,  T_Max 

7CLAIM  START  TRT,  TRTclaim,  T Max 

CLAIM_R1 

lUT  issues 

# 

Claim  frame 

# 

! CLAIM 

CLAIM_T2 

Tester 

# 

issues  its 

# 

Claim  frame 

# 

with  highes 

# 

t T Bid. 

7 CLAIM  START  TRT 

CLAIM_R2 

lUT  repeats 

# 

Tester 

# 

Claim  Frame 

# 

• 

! TOKEN 

TOKEN_Tl 

Tester 

# 

issues 

# 

Token . 

7 TOKEN 

TOKEN__Rl 

P 

lUT  repeats 

# 

Token . 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

7 OTHERWISE 

F 

7 TIMEOUT  TRT 

F 
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Test  Case  Dynamic  Behaviour 

Reference : FDDI/MAC/CLAIMTOKEN/IUTWinClaim 

Identifier:  lUTWinClaim 

Purpose:  Test  MAC  Claim  Token  process 

2 : lUT  wins  Claim  Token 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

lUTWinClaim 

+FDDI / INITCONNECT 

7TIMEOUT  TVX(a:=l) 

B 

! IDLE 

IDLE_I 

Tester 

# 

holds  Token 

# 

and  sends 

# 

Idle  symbol 

# 

s until  TVX 

# 

expires . 

[a-0] 

GOTO  B 

START  TRT,  TRTclaim,  T_Max 

7CLAIM  START  TRT,  TRTclaim,  T_Max 

CLAIM_R1 

lUT  issues 

# 

Claim  frame 

# 

. 

! CLAIM 

CLAIM_T3 

Tester 

# 

issues  its 

# 

Claim  frame 

# 

with  lowest 

# 

T_Bid. 

7CLAIM 

CLAIM_R1 

lUT  issues 

# 

its  Claim 

# 

frame  again 

# 

. 

! CLAIM  START  TRT 

CLAIM_T1 

Tester 

# 

repeats 

# 

lUT's  Claim 

# 

frame . 

7 TOKEN 

TOKEN_Rl 

P 

lUT  issues 

# 

Token . 

7 OTHERWISE 

F 

7 TIMEOUT  TRT 

F 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

12 
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Test  Case  Dynamic  Behaviour 

Reference : FDDI/MAC/BEACONING/TesterGotOwnBeacon 

Identifier:  TesterGotOwnBeacon 

Purpose:  Test  MAC  Beacon  process  1:  Tester  receives  its  own  Beacon 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

TesterGotOwnBeacon 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

7TIMEOUT  TVX(a:=l) 

C 

Tester 

# 

holds  Token 

# 

and  sends 

# 

Idle  symbol 

# 

s until  TVX 

# 

expires . 

! IDLE 

IDLE_I 

[a=0] 

GOTO  C 

START  TRT,  TRTclaim,  T_Max 

7CLAIM 

CLAIM_R1 

lUT  issues 

# 

Claim  frame 

# 

. 

? TIMEOUT  TRT 

Tester 

# 

holds  lUT's 

# 

Claim  frame 

# 

to  cause 

# 

that  the 

# 

Claim  Token 

# 

process 

# 

fails . 

START  TRT,  TRTbeacon,  T_Max 

? BEACON 

BEACON_Rl 

lUT  issues 

# 

Beacon 

# 

frame . 

! BEACON 

BEACON_T2 

Tester 

# 

holds  lUT's 

# 

Beacon 

# 

frame  and 

# 

issues  its 

# 

own  Beacon 

# 

frame . 

7BEACON  START  TRT,  TRTclaim, 

BEACON_R2 

lUT  repeats 

#T  Max 

Tester' s 

# 

Beacon 

# 

frame . 

! CLAIM 

CLAIM_T4 

After  Teste 

# 

r receives 

# 

its  own 

# 

Beacon 

# 

frame,  it 

# 

sends  Claim 

Continued  on  next  page 
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Behaviour  Description 

Label 

Constraint 

Reference 

V 

Comments 

# 

frame . 

? CLAIM  START  TRT 

CLAIM_R4 

lUT  repeats 

# 

Tester' s 

# 

Claim  frame 

# 

! TOKEN 

TOKEN_Tl 

Tester 

# 

issues 

# 

Token  after 

# 

it  receives 

# 

its  own 

# 

Claim  frame 

# 

• 

? TOKEN 

TOKEN_Rl 

P 

lUT  repeats 

# 

Token . 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

7 OTHERWISE 

F 

7 TIMEOUT  TRT 

F 

7 OTHERWISE 

I 

7 TIMEOUT  TRT 

I 

22 


34 


T-0007 


FDDI  MAC  Confonnance  Test 


10-6-89 


Test  Case  Dynamic  Behaviour 

Reference : FDDI /MAC/BEACONING/ lUTGotOwnBeacon 

Identifier:  lUTGotOwnBeacon 

Purpose:  Test  MAC  Beacon  process  2:  lUT  receives  its  own  Beacon 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

lUTGotOwnBeacon 

-l-FDDI  INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

7TIMEOUT  TVX(a:=l) 

D 

Tester 

# 

holds  Token 

# 

and  sends 

# 

Idle  symbol 

# 

s until  TVX 

# 

expires . 

! IDLE 

IDLE_I 

[a=0] 

GOTO  D 

START  TRT,  TRTclaim,  T_Max 

7CLAIM 

CLAIM  R1 

lUT  issues 

# 

Claim  frame 

# 

. 

7 TIMEOUT  TRT 

Tester 

# 

holds  lUT's 

# 

Claim  frame 

# 

to  cause 

# 

that  the 

# 

Claim  frame 

# 

fails . 

START  TRT,  TRTbeacon,  T_Max 

7 BEACON 

BEAC0N_R1 

lUT  issues 

# 

Beacon 

# 

f r ame . 

! BEACON  START  TRT,  TRTclaim, 

BEACON_Tl 

Tester 

#T  Max 

repeats 

# 

lUT's  Beaco 

# 

n frame. 

7 CLAIM 

CLAIM_R1 

After  lUT 

# 

receives 

# 

its  own 

# 

Beacon 

# 

frame,  it 

# 

issues 

# 

Claim  frame 

# 

. 

! CLAIM  START  TRT 

CLAIM_T1 

Tester 

# 

repeats 

# 

lUT's  Beaco 

# 

n frame. 

7 TOKEN 

TOKEN  R1 

P 

After  lUT 

# 

wins  Claim 

Continued  on  next  page 
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Behaviour  Description 

Label 

Constraint 

Reference 

V 

Comments 

# 

Token  proce 

# 

ss,  it 

# 

issues 

# 

Token . 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

70THERWISE 

I 

7 TIMEOUT  TRT 

I 

Test  Case 

Dynamic 

Behaviour 

Reference:  FDDI/MAC/TTRP/EarlyToken 

Identifier:  EarlyToken 

Purpose:  Test  MAC  Timed  Token  Rotation  protocol  (TTRP)  1:  Tester  receives  Early 

Token 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

EarlyToken 

+FDD I / INITCONNECT 

!ECHO  Req 

ECHO__Req^Tl 

Tester 

# 

sends  SMT 

# 

ECHO  Reques 

# 

t frame. 

! TOKEN 

TOKEN__Tl 

Tester 

# 

issues 

# 

Token. 

7 ECHO  Resp 

ECHO  Resp__Rl 

lUT  returns 

# 

ECHO  Respon 

# 

se  frame. 

7 TOKEN 

TOKEN  R1 

P 

lUT  returns 

# 

Token 

# 

(TRT<TTRT) . 

7 OTHERWISE 

F 

7 TIMEOUT  TRT 

F 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

12 
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Test  Case 

Dynamic  Behaviour 

Reference:  FDDI/MAC/TTRP/LateToken 

Identifier:  LateToken 

Purpose:  Test  MAC  Timed  Token  Rotation  Protocol (TTRP)  2:  Tester  receives  Late 

Token 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

LateToken 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

! ECHO_Req 

ECHO_Req_Tl 

Tester 

# 

sends  SMT 

# 

ECHO  Reques 

# 

t frame, 

? TIMEOUT  TRT 

START  TRT 

! TOKEN 

TOKEN_Tl 

and  issues 

# 

Late  Token 

# 

when  TTRT<T 

# 

RT<2xTTRT. 

? TOKEN  START  TRT 

TOKEN_Rl 

lUT  returns 

# 

Token . 

!ECHO  Req 

ECHO_Req_Tl 

Tester 

# 

sends  SMT 

# 

ECHO  Reques 

# 

t frame 

# 

again. 

? TIMEOUT  TRT 

START  TRT 

! TOKEN 

T0KEN_T1 

and  issues 

# 

Late  Token 

# 

again  when 

# 

TTRT<TRT<2x 

# 

TTRT. 

? TOKEN 

TOKEN_Rl 

P 

lUT  returns 

# 

Token . 

? OTHERWISE 

F 

? TIMEOUT  TRT 

F 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

12 
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Test  Case  Dynainic  Behaviour 
Reference : FDDI/MAC/MONITORING/TRTtesting 
Identifier:  TRTtesting 

Purpose:  Test  MAC  Monitoring  function  1:  TRT  Monitoring  Function 
Defaults  Reference: 


Behaviour  Description 

Label 

Constraint 

Reference 

V 

Comments 

TRTtesting 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

!ECHO  Req 

ECHO__Req_Tl 

Tester 

# 

sends  SMT 

# 

ECHO  Reques 

# 

t frame. 

? TIMEOUT  TRT 

Causing  TRT 

# 

expired. 

START  TRT 

? TIMEOUT  TRT 

Causing  TRT 

# 

expired 

# 

twice  and 

# 

Token  never 

# 

has  been 

# 

seen. 

START  TRT,  TRTclaim,  TJMax 

? CLAIM 

CLAIM__R1 

lUT  initiat 

# 

es  Claim 

# 

Token  proce 

# 

ss . 

! CLAIM  START  TRT 

CLAIM_T1 

Tester 

# 

repeats 

# 

Claim  frame 

# 

. 

? TOKEN 

TOKEN  R1 

P 

lUT  issues 

# 

Token . 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

12 
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Test  Case  Dynamic 

Behaviour 

Reference : FDDI/MAC/MONITORING/TVXtesting 

Identifier;  TVXtesting 

Purpose:  Test  MAC  Monitoring  Function  2: 

TVX  Monitoring  Function 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

TVXtesting 

+FDDI / INITCONNECT 

Initializin 

# 

g Connectio 

# 

n(test 

# 

group) 

+TVX  SUBTREEl 

Subtree  1 

+FDDI / INITCONNECT 

Initializin 

# 

g Connectio 

# 

n (test 

# 

group) 

+TVX_SUBTREE2 

Subtree  2 

TVX  SUBTREEl 

!DATA  OverMaxLen 

DATA_OverMaxL 

Tester 

# 

en  T1 

sends  teste 

# 

r frame 

# 

(DA=IUT 

# 

Address ; 

# 

Frame  symbo 

# 

1 time>TVX) 

# 

, to  cause 

# 

TVX  expire. 

START  TRT,  TRTclaim,  T Max 

7CLAIM 

CLAIM_R1 

lUT  initiat 

# 

es  Claim 

# 

Tolcen  proce 

# 

ss . 

! CLAIM  START  TRT 

CLAIM_T1 

Tester 

# 

repeats  the 

# 

Claim  frame 

# 

sent  by 

# 

lUT. 

7TOKEN 

TOKEN_Rl 

(P) 

lUT  issues 

# 

To)cen . 

70THERWISE 

(F) 

7 TIMEOUT  TRT 

(F) 

70THERWISE 

(F) 

7 TIMEOUT  TRT 

(F) 

TVX  SUBTREE2 

7TIMEOUT  TVX(a:=l) 

E 

Holds  Tolcen 

# 

and  sends 

# 

Idle  symbol 

# 

s until  TVX 

# 

expires . 

! IDLE 

IDLE_I 

[a=0] 

GOTO  E 

Continued  on  next  page 
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Behaviour  Description 

Label 

Constraint 

Reference 

V 

Comments 

START  TRT,  TRTclaim,  T_Max 

7CLAIM 

CLAIM_R1 

lUT  starts 

# 

Claim  Token 

# 

process . 

! CLAIM  START  TRT 

CLAIM_T1 

? TOKEN 

TOKEN_Rl 

R 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

7 OTHERWISE 

F 

7 TIMEOUT  TRT 

F 

Test  Case  Dynamic 

Behaviour 

Reference : FDDI/MAC/FED/PHInvalidRlOb 

Identifier:  PHInvalidRlOb 

Purpose:  Test  MAC  Frame  Error  Detection  1:  R(lOb)  — a transition  at  MAC  receive 

state  machine 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

PHInvalidRlOb 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

!DATA 

DATA_T3 

Tester 

# 

sends  the 

# 

frame (DA=IU 

# 

T Address; 

# 

A Invalid 

# 

Symbol  in 

# 

PA) 

! TOKEN 

TOKEN_Tl 

followed  by 

# 

Token . 

7DATA  Strip 

DATA_Strip_Rl 

Idles  retur 

# 

ned 

? TOKEN 

TOKEN__Rl 

P 

followed  by 

# 

Token . 

? OTHERWISE 

F 

7 TIMEOUT  TRT 

F 

7 OTHERWISE 

F 

7 TIMEOUT  TRT 

F 

22 
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Test  Case  Dynamic 

Behaviour 

Reference : FDDI/MAC/FED/PHInvalidR20b 

Identifier;  PHInvalidR20b 

Purpose:  Test  MAC  Frame  Error  Detection  2:  R(20b)  — a transition  at 

MAC  receive 

state  machine 

Defaults  Reference; 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

PHInvalidR2  Ob 

+FDD I / INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

!DATA 

DATA  T4 

Tester 

# 

sends  the 

# 

frame (DA=IU 

# 

T Address; 

# 

a Invalid 

# 

Symbol 

# 

after  J in 

# 

SD) 

! TOKEN 

TOKEN_Tl 

followed  by 

# 

Token . 

?DATA_Strip 

DATA_Strip_Rl 

PA  returned 

# 

f 

? TOKEN 

T0KEN_R1 

P 

followed  by 

# 

Token . 

? OTHERWISE 

F 

? TIMEOUT  TRT 

F 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

22 
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Test  Case  Dynamic 

Behaviour 

Reference : FDDI/MAC/FED/PHInvalidR30b 

Identifier:  PHInvalidRSOb 

Purpose:  Test  MAC  Frame  Error  Detection  3:  R(30b)  — a transition  at  MAC  receive 

state  machine 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

PHInvalidR30b 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

!DATA 

DATA_T5 

Tester 

# 

sends  the 

# 

frame (DA=IU 

# 

T Address; 

# 

a Invalid 

# 

Symbol  in 

# 

INFO) 

! TOKEN 

TOKEN_Tl 

followed  by 

# 

Token . 

7DATA  Strip 

D ATA_S  t r ip_R2 

PA,  SD,FC,DA 

# 

, SA  and 

# 

Idles  retur 

# 

ned, 

? TOKEN 

TOKEN_Rl 

P 

followed  by 

# 

Token . 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

7 OTHERWISE 

F 

7 TIMEOUT  TRT 

F 

t 

t 

42 
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Test  Case  Dynamic 

Behaviour 

Reference : FDDI/MAC/FED/PHInvalidR40b 

Identifier:  PHInvalidR40b 

Purpose:  Test  MAC  Frame  Error  Detection  4:  R(40b)  — a transition  at 

MAC  receive 

state  machine 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

PHInvalidR40b 

+FDD I / INI TCONNECT 

!DATA 

DATA  T6 

Tester 

# 

sends  the 

# 

frame (DA=IU 

# 

T Address; 

# 

a Invalid 

# 

Symbol  in 

# 

FS) 

! TOKEN 

TOKEN  T1 

followed  by 

# 

Token . 

?DATA  Strip 

DATA_Strip_R4 

PA,  SD,  FC, 

# 

DA,  SA, 

# 

INFO,  FCS, 

# 

ED  and  FS 

# 

returned 

# 

(E=S,  A=S, 

# 

C=S) 

? TOKEN 

TOKEN_Rl 

P 

followed  by 

# 

Token . 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

22 
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Test  Case 

Dynamic 

Behaviour 

Reference:  FDDI/MAC/FED/DetectSD 

Identifier:  DetectSD 

Purpose:  Test  MAC  Frame  Error  Detection  5 

: Detect  SD 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

DetectSD 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

!DATA 

DATA  T7  0 

Tester 

# 

sends  the 

# 

frame (DA=IU 

# 

T Address; 

# 

an  Idle 

# 

Symbol 

# 

after  J) 

! TOKEN 

TOKEN___Tl 

Followed  by 

# 

Token . 

?DATA__Strip 

DATA__Strip_Rl 

PA  and 

# 

Idles  retur 

# 

ned. 

? TOKEN 

TOKEN_Rl 

(P) 

Followed  by 

# 

Token . 

70THERWISE 

(F) 

? TIMEOUT  TRT 

(F) 

70THERWISE 

(F) 

7 TIMEOUT  TRT 

(F) 

!DATA  START  TRT 

DATA  T7  1 

Tester 

# 

sends  the 

# 

frame (DA-IU 

# 

T Address; 

# 

other  symbo 

# 

1 (not  K 

# 

symbol) 

# 

before  K in 

# 

SD) 

! TOKEN 

TOKEN_Tl 

followed  by 

# 

Token . 

7DATA  Strip 

DATA  StriR_Rl 

PA  and  Idle 

# 

returned, 

7 TOKEN 

TOKEN^Rl 

R 

followed  by 

# 

Token . 

7 OTHERWISE 

F 

7 TIMEOUT  TRT 

F 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

22 
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Test  Case  Dynamic 

Behaviour 

Reference:  FDDI/MAC/FED/DetectFC 

Identifier:  DetectFC 

Purpose:  Test  MAC  Frame  Error  Detection  6 

: Detect  FC 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

DetectFC 

+FDD I / INI  TCONNECT 

Initializin 

# 

g Connectio 

# 

n 

!DATA 

DATA  T8 

Tester 

# 

sends  the 

# 

frame  (DA=IU 

# 

T Address; 

# 

a symbol 

# 

sequence 

# 

(not  Idle 

# 

(s)  or  nn) 

# 

after  K in 

# 

FC)  , 

! TOKEN 

TOKEN_Tl 

followed  by 

# 

Token . 

?DATA  Strip 

D ATA_S  t r ip_R5 

PA,  SD  and 

# 

Idles  retur 

# 

ned. 

? TOKEN 

TOKEN_Rl 

P 

followed  by 

# 

Token . 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

? OTHERWISE 

F 

? TIMEOUT  TRT 

F 

12 
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Test  Case 

Dynamic 

Behaviour 

Reference : FDDI/MAC/FED/DetectFrameBodyl 

Identifier:  DetectFrameBodyl 

Purpose:  Test  MAC  Frame  Error  Detection  7 

: Detect  Frame  Body 

L 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

DetectFrameBodyl 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

!DATA 

DATA_T9 

Tester 

# 

sends  the 

# 

frame (DA=IU 

# 

T Address; 

# 

an  Idle 

# 

symbol  in 

# 

INFO) , 

! TOKEN 

T0KEN__T1 

followed  by 

# 

Token . 

?DATA_Strip 

D ATA_S  t r ip_R2 

PA,  SD,  FC, 

# 

DA,  SA  and 

# 

Idles  retur 

# 

ned. 

? TOKEN 

T0KEN_R1 

P 

followed  by 

# 

Token . 

? OTHERWISE 

F 

? TIMEOUT  TRT 

F 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

12 
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Test  Case  Dynamic 

Behaviour 

Reference ; FDDI/MAC/FED/DetectFrameBody2 

Identifier;  DetectFrameBody2 

Purpose:  Test  MAC  Frame  Error  Detection  8 

: Detect  Frame  Body  2 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

DetectFrameBody2 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

!DATA 

DATA  TIO 

Tester 

# 

sends  the 

# 

frame (DA=IU 

# 

T Address; 

# 

a symbol 

# 

(not  Idle 

# 

or  data)  in 

# 

INFO) , 

! TOKEN 

TOKEN  T1 

followed  by 

# 

Token . 

7DATA  Strip 

DATA_Strip_R2 

PA,  SD,  FC, 

# 

DA,  SA  and 

# 

Idles  retur 

# 

ned. 

? TOKEN 

TOKEN_Rl 

P 

followed  by 

# 

Token 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

? OTHERWISE 

F 

? TIMEOUT  TRT 

F 

22 
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Test  Case 

Dynamic 

Behaviour 

Reference : FDDI/MAC/FED/DetectInvalidLength 

Identifier:  DetectInvalidLength 

Purpose:  Test  MAC  Frame  Error  Detection  9: 

Detect  Invalid 

Data 

Length  Frame 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

DetectInvalidLength 

+FDD I / INITCONNECT 

! DATA  InvLen 

DATA  InvLen  T 

Tester 

# 

1 

sends  the 

# 

frame 

# 

(DA^IUT 

# 

Address;  a 

# 

Invalid 

# 

Data  Length 

# 

Frame)  , 

! TOKEN 

TOKEN_Tl 

followed  by 

# 

Token . 

?DATA  Strip 

DATA__Strip__R3 

PA,  SD,  FC, 

# 

DA,  SA, 

# 

INFO,  FCS, 

# 

ED  and  FS 

# 

returned 

# 

(A==S,  E=S, 

# 

C-R)  , 

? TOKEN 

TOKEN__Rl 

p 

followed  by 

# 

Token . 

? OTHERWISE 

F 

? TIMEOUT  TRT 

F 

? OTHERWISE 

F 

? TIMEOUT  TRT 

F 

22 
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Test  Case  Dynamic  Behaviour 

Reference:  FDDI/MAC/FED/DetectFCS 

Identifier:  DetectFCS 

Purpose:  Test  MAC  Frame  Error  Detection  10:  Detect  FCS 

Errors 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

DetectFCS 

+FDDI/INITCONNECT 

Intializing 

# 

Connection 

!DATA 

DATA  Til  0 

Tester 

# 

sends  the 

# 

frame (DA=IU 

# 

T Address; 

# 

FCS  errors) 

# 

9 

! TOKEN 

T0KEN_T1 

followed  by 

# 

Token . 

?DATA 

DATA  Rll  0 

lUT  repeats 

# 

Tester' s 

# 

frame  (A=S, 

# 

E=S,C=R) , 

? TOKEN 

TOKEN  R1 

Token  retur 

# 

ned. 

!DATA 

DATA  Til  1 

Tester 

# 

sends  the 

# 

frame  (DAOI 

# 

UT  Address; 

# 

FCS  error) , 

! TOKEN 

TOKEN  T1 

followed  by 

# 

Token . 

7DATA 

DATA  Rll  1 

lUT  repeats 

# 

Tester's 

# 

frame (A=R, 

# 

E=S,  C=R) 

? TOKEN 

TOKEN_Rl 

P 

lUT  returns 

# 

Token. 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 

70THERWISE 

F 

7 TIMEOUT  TRT 

F 
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Test  Case  Dynamic 

Behaviour 

Reference : FDDI/MAC/TED/PHInvalidR50b 

Identifier:  PHInvalidRSOb 

Purpose:  Test  MAC  Token  Error  Detection  1:  R(50b)  --  a transition  at  MAC  receive 

state  machine 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

PHInvalidRS Ob 

+FDDI/INITCONNECT 

Initializin 

# 

g Connectio 

# 

n 

! TOKEN 

TOKEN_T2 

Tester 

# 

sends  the 

# 

Token  (a 

# 

Invalid 

# 

Symbol  in 

# 

ED)  , 

7TOKEN  Strip 

TOKEN__Strip__R 

P 

PA,SD,FC 

# 

1 

and  Idles 

# 

returned. 

? OTHERWISE 

F 

? TIMEOUT  TRT 

F 

Test  Case 

Dynamic 

Behaviour 

Reference : FDDI/MAC/TED/DetectTokenEDl 

Identifier:  DetectTokenEDl 

Purpose:  Test  MAC  Token  Error  Detection  2 

: Test  1 for  ED 

of  Token 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

DetectTokenEDl 

+FDD I / INITCONNECT 

! TOKEN 

TOKEN__T3 

Tester 

# 

sends  Token 

# 

(an  Idle 

# 

Syn^ol  in 

# 

ED) 

7TOKEN  Strip 

TOKEN  St rip_R 

(P) 

PA,  SD,  FC 

# 

1 

and  Idles 

returned. 

7 OTHERWISE 

(F) 

7 TIMEOUT  TRT 

(F) 

22 
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Test  Case 

Dynamic 

Behaviour 

Reference : FDDI/MAC/TED/DetectTokenED2 

Identifier:  DetectTokenED2 

Purpose:  Test  MAC  Token  Error  Detection  3 

: Test  2 for  the  ED  of  Token 

Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

V 

Comments 

Reference 

Detect TokenED2 

+FDDI/INITCONNECT 

! TOKEN 

TOKEN_T4 

Tester 

# 

sends  the 

# 

Token (any 

# 

symbol (not 

# 

Idles  or  T) 

# 

in  ED) 

? TOKEN  Strip 

TOKEN  Strip  R 

P 

PA,  SD,  FC 

# 

1 

and  Idles 

# 

returned 

70THERWISE 

F 

? TIMEOUT  TRT 

F 

Test  Step  Dynamic  Behaviour 

Reference:  FDDI/ INI TCONNECT 

Identifier:  INITCONNECT 

Objective:  To  complete  ring  initialization  and  form  a Token  path  for  test  cases 
Defaults  Reference: 

Behaviour  Description 

Label 

Constraint 

Reference 

V 

Comments 

INITCONNECT 

# 

-l-CMTandTokenPath 

To  be  speci 
f ied. 

12 
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$Suite  $SuiteIci  FDDI 
$Begin_SuiteOverview 
$SuiteId  FDDI 

$StanciardsRef  FDDI  MAC  (X3T9 . 5/ 88-139 ) ; 

$PICSRef  Test  Suite  for  FDDI  MAC  Conformance  Verification 
$PIXITRef  Test  Suite  for  FDDI  MAC  Conformance  Verification 
$HowUsed  Test  Suite  for  FDDI  MAC  Conformance  Verification 
$TestMethods  The  Remote  Test  Method 

$Comment  Test  Suite  for  FDDI  MAC  Conformance  Verification  $SuiteIndex 

$ Test Case Index  $End_Test Case Index 

$TestStepIndex  $End_TestStepIndex 

$Def aultindex  $End_Def aultindex 

$End_SuiteIndex  $End_SuiteOverview 

$Declarations 

$UserTYPEdefs 

$Begin_TTCN_TYPEdef s 

$TTCN_TYPEdef 

$UserTypeId  Symbol 

$Base  BITSTRING 

$TypeDef  BITSTRING [5] 

$Comment  The  smallest  signaling  element  used  by  MAC.  $End_TTCN_TYPEdef 

$TTCN_TYPEdef 

$UserTypeId  Sstring 

$Base  BITSTRING 

$TypeDef 

('llllO'B,  'OlOOl'B,  'lOlOO'B,  'lOlOl'B,  'OlOlO'B,  'OlOll'B,  'OlllO'B,  'Ollll'B,  '1C 
$Comment  Symbolstring (Sstring)  is  the  TTCN  new  type  defined  by  user.  $End_TTCN_TYPEc 
$End_TTCN_TYPEdefs  $End_UserTYPEdef s 
$ Be gi n_T S_P ARdc 1 s 
$TS_PARdcl 

$TS_PARid  IUT_Address 
$TS_PARtype  INTEGER 
$PICS_PIXIT 

$Comment  The  address  of  Station  Under  Test.  $End_TS_PARdcl 
$TS_PARdcl 

$TS_PARid  Tester_Address 
$TS_PARtype  INTEGER 
$PICS_PIXIT 

$Comment  The  address  of  Tester.  Get  this  value  from  Tester.  $End_TS_PARdcl 

$TS_PARdcl 

$TS_PARid  TTRT 

$TS_PARtype  INTEGER  (4000  TO  167772) 

$PICS_PIXIT 

$Comment  The  operative  Target  Token  Rotation  Time.  $End_TS_PARdcl 
$TS_PARdcl 

$TS_PARid  T_Req_Tester 
$TS_PARtype  INTEGER  (4000  TO  167772) 

$PICS_PIXIT 

$Comment  Tester's  Requested  TTRT.  $End_TS_PARdcl 

$TS_PARdcl 

$TS_PARid  T_Req_IUT 

$TS_PARtype  INTEGER  (4000  TO  167772) 

$PICS_PIXIT 

$Comment  lUT' s Requested  TTRT.  $End_TS_PARdcl 

$TS_PARdcl 

$TS_PARid  T_Bid_Max 

$TS_PARtype  INTEGER  (4000  TO  167772) 

$PICS_PIXIT 

$Comment  Highest  Bidding  Value  of  Tester  in  Claim  Token  Process.  $End_TS_PARdcl 

$TS_PARdcl 

$TS_PARid  T_Bid_Min 

$TS_PARtype  INTEGER  (4000  TO  167772) 

$PICS_PIXIT 

$Comment  Lowest  Bidding  Value  of  Tester  in  Claim  Token  process.  $End_TS_PARdcl 

$TS_PARdcl 

$TS  PARid  M FCS  Rev 
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$TS_PARtype  BITSTRING 
$PICS_PIXIT 
$End_TS_PARdcl 
$TS_PARdcl 

$TS_PARid  M_FCS_Tramt 

$TS_PARtype  BITSTRING 

$PICS_PIXIT 

$End_TS_PARdcl 

$End_TS_PARdcls 

$Begin_CONSTdcls 

$CONSTdcl 

$CONSTid  T_Max 

$CONSTtype  INTEGER 

$CONSTvalue  167772 

$Cornment  The  maximum  value  (default  value)  of  TRT . $End_CONSTdcl 

$CONSTdcl 

$CONSTid  T_Min 

$CONSTtype  INTEGER 

$CONSTvalue  4000 

$Comment  The  minimum  value  (default  value)  of  TRT.  $End__CONSTdcl 

$C0NSTdcl 

$C0NSTid  SO 

$CONSTtype  Sstring 

$CONSTvalue  ' 11110' B 

$Comment  Data  Symbol  0 $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SI 

$CONSTtype  Sstring 

$CONSTvalue  ' 01001' B 

$Comment  Data  Symbol  1 $End_CONSTdcl 

$CONSTdcl 

$CONSTid  S2 

$CONSTtype  Sstring 

$CONSTvalue  ' 10100' B 

$Comment  Data  Symbol  2 $End_CONSTdcl 

$CONSTdcl 

$CONSTid  S3 

$CONSTtype  Sstring 

$CONSTvalue  ' 10101' B 

$Comment  Data  Symbol  3 $End_CONSTdcl 

$CONSTdcl 

$CONSTid  S4 

$CONSTtype  Sstring 

$CONSTvalue  ' 01010' B 

$Comment  Data  Symbol  4 $End_CONSTdcl 

$CONSTdcl 

$CONSTid  S5 

$CONSTtype  Sstring 

$CONSTvalue  ' 01011' B 

$Comment  Data  Symbol  5 $End_CONSTdcl 

$CONSTdcl 

$CONSTid  S6 

$CONSTtype  Sstring 

$CONSTvalue  'OHIO'S 

$Comment  Data  Symbol  6 $End_CONSTdcl 

$CONSTdcl 

$CONSTid  S7 

$CONSTtype  Sstring 

$CONSTvalue  ' 01111' B 

$Comment  Data  Symbol  7 $End_CONSTdcl 

$CONSTdcl 

$CONSTid  S8 

$CONSTtype  Sstring 

$CONSTvalue  ' 10010' B 

$Comment  Data  Symbol  8 $End_CONSTdcl 

$CONSTdcl 
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$CONSTid  S9 

$CONSTtype  Sstring 

$CONSTvalue  ' 10011' B 

$Cominent  Data  Symbol  9 $End_CONSTdcl 

$CONSTdcl 

$CONSTid  sA 

$CONSTtype  Sstring 

$CONSTvalue  ' 10110' B 

$Comment  Data  Symbol  A $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SB 

$CONSTtype  Sstring 

$CONSTvalue  ' 10111' B 

$Comment  Data  Symbol  B $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SC 

$CONSTtype  Sstring 

$CONSTvalue  ' 11010' B 

$Comment  Data  Symbol  C $End_CONSTdcl 

$CONSTdcl 

$CONSTid  sD 

$CONSTtype  Sstring 

$CONSTvalue  ' 11011' B 

$Comment  Data  Symbol  D $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SE 

$CONSTtype  Sstring 

$CONSTvalue  ' 11100' B 

$Comment  Data  Symbol  E $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SF 

$CONSTtype  Sstring 

$CONSTvalue  ' 11101' B 

$Comment  Data  Symbol  F $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SQ 

$CONSTtype  Sstring 

$CONSTvalue  ' 00000' B 

$Comment  Line  State  Symbol  Q $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SI 

$CONSTtype  Sstring 

$CONSTvalue  ' 11111' B 

$Comment  Line  State  Symbol  I $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SH 

$CONSTtype  Sstring 

$CONSTvalue  ' 00100' B 

$Comment  Line  State  Symbol  H $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SJ 

$CONSTtype  Sstring 

$CONSTvalue  ' 11000' B 

$Comment  Starting  Delimiter  J $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SK 

$CONSTtype  Sstring 

$CONSTvalue  'lOOOl'B 

$Comment  Starting  Delimiter  K $End_CONSTdcl 

$CONSTdcl 

$CONSTid  ST 

$CONSTtype  Sstring 

$CONSTvalue  ' 10101' B 

$Comment  Ending  Delimiter  T $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SR 
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$CONSTtype  Sstring 
$CONSTvalue  ' 01010' B 


$CoiTiment  Reset  Symbol  R $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SS 

$CONSTtype  Sstring 


$CONSTvalue  ' 01011' B 

$Comment  Set  Symbol  S $End_CONSTdcl 

$CONSTdcl 

$CONSTid  S0S1S2S3S4S5S6S7 
$CONSTtype  HEXSTRING 

$CONSTvalue  ' F2 69552DCF' H $End_CONSTdcl 
$CONSTdcl 

$CONSTid  SISISQSISISISISISISISISISISISISI 
$CONSTtype  HEXSTRING 

$CONSTvalue  ' FFCIFFFFFFFFFFFFFFFF' H $End_CONSTdcl 
$CONSTdcl 

$CONSTid  S0SQS2S3S4S5S6S7 
$CONSTtype  HEXSTRING 

$CONSTvalue  ' F029552DCF' H $End  CONSTdcl 


$CONSTdcl 

$CONSTid  S0SIS2S3S4S5S6S7 
$CONSTtype  HEXSTRING 

$CONSTvalue  ' F7E9552DCF' H $End_CONSTdcl 
$CONSTdcl 

$CONSTid  S0STS2S3S4S5S6S7 
$CONSTtype  HEXSTRING 

$CONSTvalue  ' F569552DCF' H $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SQSH 

$CONSTtype  BITSTRING 

$CONSTvalue  ' OOOOOOOIOO'B  $End  CONSTdcl 


$CONSTdcl 
$CONSTid  SJSK 
$CONSTtype  BITSTRING 

$CONSTvalue  ' IIOOOIOOOI'B  $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SJSQ 

$CONSTtype  BITSTRING 

$CONSTvalue  ' 1100000000 ' B $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SJSI 

$CONSTtype  BITSTRING 

$CONSTvalue  ' llOOOlllll'B  $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SISK 

$CONSTtype  BITSTRING 

$CONSTvalue  ' 1111110001' B $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SRSRSR 

$CONSTtype  BITSTRING 

$CONSTvalue  ' 010100101001010' B $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SRSSSS 

$CONSTtype  BITSTRING 

$CONSTvalue  ' 010100101101011' B $End_CONSTdcl 
$ CONSTdcl 
$CONSTid  SRSQSR 
$CONSTtype  BITSTRING 

$CONSTvalue  ' 010100000001010' B $End_CONSTdcl 
$CONSTdcl 

$CONSTid  SOSOSOSOSOSOSOSO 
$CONSTtype  HEXSTRING 

$CONSTvalue  ' F7BDEF7BDE' H $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SSSSSR 
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$CONSTtype  BITSTRING 

$CONSTvalue  ' 010110101101010' B $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SSSRSR 

$CONSTtype  BITSTRING 

$CONSTvalue  ' 010110101001010' B $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SQST 

$CONSTtype  BITSTRING 

$CONSTvalue  ' 0000010101 ' B $End_CONSTdcl 

$CONSTdcl 

$CONSTid  STST 

$CONSTtype  BITSTRING 

$CONSTvalue  ' 1010110101 ' B $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SIST 

$CONSTtype  BITSTRING 

$CONSTvalue  ' 1111110101 ' B $End  CONSTdcl 


$CONSTdcl 
$CONSTid  SOST 
$CONSTtype  BITSTRING 

$CONSTvalue  ' 1111010101 ' B $End_CONSTdcl 

$CONSTdcl 

$CONSTid  SSSSSS 

$CONSTtype  BITSTRING 

$CONSTvalue  ' 010110101101011' B $End  CONSTdcl 


$CONSTdcl 
$CONSTid  P_16 
$CONSTtype  OCTETSTRING 
$CONSTvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 


$Comment  The  Preamble  field  in  frame  transmitted  by  Tester.  $End_CONSTdcl  $End_CONS'] 

$ Be g i n_T S_VARdc 1 s 

$TS_VARdcl 

$TS_VARid  a 

$TS_VARtype  INTEGER 

$TS_VAR value  0 

$Comment  A variable  for  the  test  suite.  $End_TS_VARdcl  $End_TS_VARdcls 

$Begin_PCOdcls 

$PCOdcl 

$PCOid  L 


$Role  The  Point  of  Control  and  Observation  of  lower  tester  for  MAC,  CMT  or  SMT  frame 
$PDUdcls 


$Begin_TTCN_PDUdcl 
$PDUid  DATA 


$Comment  General  MAC  Data  Frame 
$PCI 

$FIELDdcl 
$FIELDid  PA 


$FIELDtype  Sstring[16] 

$Comment  Preamble  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  SD 


$FIELDtype  Sstring[2] 

$Comment  Starting  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FC 

$FIELDtype  Sstring[2] 

$Comment  Frame  Control  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  DA 

$FIELDtype  Sstring[12] 

$Comment  Destination  Address  $End  FIELDdcl 

$FIELDdcl 

$FIELDid  SA 

$FIELDtype  Sstring[12] 

$Comment  Source  Address  $End  FIELDdcl 
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$FIELDdcl 
$FIELDid  INFO 
$FIELDtype  Sstring [ 8956] 

$Comment  INFOrmation  $End__FIELDdcl 

$FIELDdcl 

$FIELDid  FCS 

$FIELDtype  Sstring [8] 

$Coinment  Frame  Check  Sequence  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  ED 

$FIELDtype  Sstring [1] 

$Comment  End  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FS 

$FIELDtype  Sstring [3] 

$Comment  Frame  Status  $End_FIELDdcl  $End_PCI  $End_TTCN_PDUdcl 

$Begin_TTCN_PDUdcl 

$PDUid  TOKEN 

$Comment  MAC  Nonrestricted  Token 
$PCI 

$FIELDdcl 
$FIELDid  PA 
$FIELDtype  Sstring [16] 

$Comment  Preamble  $End_FIELDdcl 
$FIELDdcl 
$FIELDid  SD 
$FIELDtype  Sstring [2] 

$Comment  Starting  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FC 

$FIELDtype  Sstring[2] 

$Comment  Frame  Control  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  ED 

$FIELDtype  Sstring [2] 

$Comment  End  Delimiter  $End_FIELDdcl  $End_PCI  $End__TTCN_PDUdcl 

$Begin_TTCN_PDUdcl 

$PDUid  DATA_InvLen 

$Comment  The  MAC  frame  with  the  Invalid  Data  Length 
$PCI 

$FIELDdcl 
$FIELDid  PA 
$FIELDtype  Sstring[16] 

$Comment  Preamble  $End_FIELDdcl 
$FIELDdcl 
$FIELDid  SD 
$FIELDtype  Sstring [2] 

$Comment  Starting  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FC 

$FIELDtype  Sstring [2] 

$Comment  Frame  Control  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  DA 

$FIELDtype  Sstring [12] 

$Comment  Destination  Address  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  SA 

$FIELDtype  Sstring [12] 

$Coinment  Source  Address  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  INFO 

$FIELDtype  Sstring [ 8955] 

$Comment  INFOrmation  field  with  the  Invalid  Data  Length.  $End_FIELDdcl 

$FIELDdcl 

SFIELDid  FCS 
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$FIELDtype  Sstring[8] 

$CoiTiment  Frame  Check  Sequence  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  ED 

$FIELDtype  Sstring[2] 

$Comment  End  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FS 

$FIELDtype  Sstring[8] 

$Comment  Frame  Status  $End_FIELDdcl  $End_PCI  $End_TTCN_PDUdcl 

$Begin_TTCN_PDUdcl 

$PDUid  DATA_OverMaxLen 

$Comment  The  MAC  frame  whose  symbol  times  is  greater  than  TVX 
$PCI 

$FIELDdcl 
$FIELDid  PA 
$FIELDtype  Sstring[16] 

$Comment  Preamble  $End_FIELDdcl 
$FIELDdcl 
$FIELDid  SD 
$FIELDtype  Sstring[2] 

$Comment  Starting  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FC 

$FIELDtype  Sstring[2] 

$Comment  Frame  Control  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  DA 

$FIELDtype  Sstring[12] 

$Comment  Destination  Address  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  SA 

$FIELDtype  Sstring[12] 

$Comment  Source  Address  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  INFO 

$FIELDtype  Sstring [ 8958 ] 

$Comment  INFOrmation  field.  This  frame's  symbol  time  is  greater  than  TVX.  $End_FIELE 

$FIELDdcl 

$FIELDid  FCS 

$FIELDtype  Sstring [8] 

$Comment  Frame  Check  Sequence  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  ED 

$FIELDtype  Sstring [1] 

$Comment  End  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FS 

$FIELDtype  Sstring [3] 

$Comment  Frame  Status  $End_FIELDdcl  $End_PCI  $End_TTCN_PDUdcl 

$Begin_TTCN_PDUdcl 

$PDUid  CLAIM 

$Comment  MAC  Claim  Frame 
$PCI 

$FIELDdcl 
$FIELDid  PA 
$FIELDtype  Sstring [16] 

$Comment  Preamble  $End_FIELDdcl 
$FIELDdcl 
$FIELDid  SD 
$FIELDtype  Sstring [2] 

$Comment  Starting  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FC 

$FIELDtype  Sstring [2] 

$Comment  Frame  Control  $End  FIELDdcl 
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$FIELDdcl 
$FIELDid  DA 
$FIELDtype  Sstring[12] 

$Comment  Destination  Address  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  SA 

$FIELDtype  Sstring[12] 

$Comment  Source  Address  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  INFO 

$FIELDtype  Sstring [ 8956] 

$Comment  INFOrmation  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FCS 

$FIELDtype  Sstring [8] 

$Coinment  Frame  Check  Sequence  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  ED 

$FIELDtype  Sstring [1] 

$Comment  End  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FS 

$FIELDtype  Sstring [3] 

$Comment  Frame  Status  $End_FIELDdcl  $End_PCI  $End_TTCN_PDUdcl 

$Begin_TTCN_PDUdcl 

$PDUid  BEACON 

$Comment  MAC  Beacon  Frame 

$PCI 

$FIELDdcl 
$FIELDid  PA 
$FIELDtype  Sstring[16] 

$Comment  Preamble  $End_FIELDdcl 
$FIELDdcl 
$FIELDid  SD 
$FIELDtype  Sstring[2] 

$Comment  Starting  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FC 

$FIELDtype  Sstring [2] 

$Comment  Frame  Control  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  DA 

$FIELDtype  Sstring [12] 

$Comment  Destination  Address  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  SA 

$FIELDtype  Sstring [12] 

$Comment  Source  Address  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  INFO 

$FIELDtype  Sstring [ 8956] 

$Comment  INFOrmation  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FCS 

$FIELDtype  Sstring [8] 

$Comment  Frame  Check  Sequence  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  ED 

$FIELDtype  Sstring [1] 

$Comment  End  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FS 

$FIELDtype  Sstring [3] 

$Comment  Frame  Status  $End_FIELDdcl  $End_PCI  $End_TTCN_PDUdcl 
$Begin_TTCN_PDUdcl 
$PDUid  ECHO_Req 


70 


$Comment  SMT  ECHO  request  Frame 
$PCI 

$FIELDdcl 
$FIELDid  PA 
$FIELDtype  Sstring[16] 

$Comment  Preamble  $End_FIELDdcl 
$FIELDdcl 
$FIELDid  SD 
$FIELDtype  Sstring[2] 

$Comment  Starting  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FC 

$FIELDtype  OCTETSTRING [ 1] 

$Comment  Frame  Control  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  DA 

$FIELDt ype  OCTETSTRING [ 6 ] 

$Comment  Destination  Address  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  SA 

$FIELDtype  OCTETSTRING [ 6] 

$Comment  Source  Address  $End_FIELDdcl 
$FIELDdcl 

$FIELDid  Frame_Class 
$FIELDtype  OCTETSTRING [ 1 ] 

$Comment  To  identify  the  function  of  the  frame.  $End_FIELDdcl 
$FIELDdcl 

$FIELDid  Frame_Type 
$FIELDtype  OCTETSTRING [ 1] 

$Comment  To  designate  the  type  of  the  frame  $End_FIELDdcl 
$FIELDdcl 

$FIELDid  Version_ID 
$FIELDtype  OCTETSTRING [ 2 ] 

$Comment  The  value  will  not  change  when  upward  compatible  changes  are  made  to  the  S^ 
$FIELDdcl 

$FIELDid  Transaction_ID 
$FIELDtype  OCTETSTRING [ 4 ] 

$Comment  To  be  used  to  pair  SMT  responses  with  their  requests.  $End_FIELDdcl 
$FIELDdcl 

$FIELDid  Station_ID 
$FIELDtype  OCTETSTRING [ 8 ] 

$Comment  The  unique  identifier  for  an  FDDI  station  (or  concentrator) . $End_FIELDdcl 

$FIELDdcl 

$FIELDid  Pad 

$FIELDtype  OCTETSTRING [ 2 ] $End_FIELDdcl 
$FIELDdcl 

$FIELDid  Inf oField_Length 
$FIELDtype  OCTETSTRING [ 2 ] 

$Comment  The  length  of  the  SMT  Information  field.  $End_FIELDdcl 
$FIELDdcl 

$FIELDid  Parameter_Type 

$FIELDtype  OCTETSTRING [2 ] $End_FIELDdcl 
$FIELDdcl 

$FIELDid  Parameter_Length 
$FIELDtype  OCTETSTRING [ 2 ] 

$Comment  The  length  of  the  Echo_data.  $End_FIELDdcl 
$FIELDdcl 

$FIELDid  Echo_data 
$FIELDtype  OCTETSTRING [ 1168 ] 

$Comment  SMT  InfoField  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FCS 

$FIELDtype  Sstring[8] 

$Comment  Frame  Check  Sequence  $End_FIELDdcl 
$FIELDdcl 
$FIELDid  ED 
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$FIELDtype  Sstring[l] 

$CoiTnnent  Ending  Delimiter  $End__FIELDdcl 

$FIELDdcl 

$FIELDid  FS 

$FIELDtype  Sstring[3] 

$Comment  Frame  Status  $End__FIELDdcl  $End__PCI  $End__TTCN__PDUdcl 

$Begin_TTCN_PDUdcl 

$PDUid  ECHO__Resp 

$Comment  SMT  ECHO  Response  Frame 
$PCI 

$FIELDdcl 
$FIELDid  PA 
$FIELDtype  Sstring[16] 

$Comment  Preamble  $End_FIELDdcl 
$FIELDdcl 
$FIELDid  SD 
$FIELDtype  Sstring[2] 

$Comment  Starting  Delimiter  $End__FIELDdcl 

$FIELDdcl 

$FIELDid  FC 

$FIELDtype  OCTETSTRING [ 1] 

$Comment  Frame  Control  $End__FIELDdcl 

$FIELDdcl 

$FIELDid  DA 

$FIELDtype  OCTETSTRING [ 6] 

$Comment  Destination  Address  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  SA 

$FIELDtype  OCTETSTRING [ 6 ] 

$Comment  Source  Address  $End__FIELDdGl 
$FIELDdcl 

$FIELDid  Frame_Class 
$FIELDtype  OCTETSTRING [ 1] 

$Comment  To  identify  the  function  of  the  frame.  $End_FIELDdcl 
$FIELDdcl 

$FIELDid  Frame__Type 
$FIELDtype  OCTETSTRING [ 1] 

$Comment  To  designate  the  type  of  the  frame.  $End_FIELDdcl 
$FIELDdcl 

$FIELDid  Version__ID 
$FIELDtype  OCTETSTRING [2] 

$Corranent  The  value  will  not  change  when  upward  compatible  changes  are  made  to  the  S^ 
$FIELDdcl 

$FIELDid  Transaction__ID 
$FIELDtype  OCTETSTRING [4] 

$Comment  To  be  used  to  pair  SMT  responses  with  their  requests.  $End__FIELDdcl 
$FIELDdcl 

$FIELDid  Station_ID 
$FIELDtype  OCTETSTRING [ 8 ] 

$Comment  The  unique  identifier  for  an  FDDI  station  (or  concentrator) . $End_FIELDdcl 

$FIELDdcl 

$FIELDid  Pad 

$FIELDtype  OCTETSTRING [2]  $End_FIELDdcl 
$FIELDdcl 

$FIELDid  Inf oField_Length 
$FIELDtype  OCTETSTRING [ 2 ] 

$Comment  The  length  of  the  SMT  Information  field.  $End__FIELDdcl 
$FIELDdcl 

$FIELDid  Parameter_Type 

$FIELDtype  OCTETSTRING [ 2 ] $End_FIELDdcl 

$FIELDdcl 

$FIELDid  Parameter_Length 
$FIELDtype  OCTETSTRING [2] 

$Comment  The  length  of  the  Echo_data.  $End__FIELDdcl 
$FIELDdcl 

$FIELDid  Echo  data 
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$FIELDtype  OCTETSTRING [ 1168 ] 

$Comment  SMT  InfoField  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FCS 

$FIELDtype  Sstring[8] 

$Comment  Frame  Check  Sequence  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  ED 

$FIELDtype  Sstring[l] 

$Comment  Ending  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FS 

$FIELDtype  Sstring[3] 

$CoiTiment  Frame  Status  $End_FIELDdcl  $End_PCI  $End_TTCN_PDUdcl 

$Begin_TTCN_PDUdcl 

$PDUid  DATA_Strip 

$Comment  MAC  Data  Frame  Stripped 

$PCI 

$FIELDdcl 
$FIELDid  PA 
$FIELDtype  Sstring[16] 

$Comment  Preamble  $End_FIELDdcl 
$FIELDdcl 
$FIELDid  SD 
$FIELDtype  Sstring[2] 

$Comment  Starting  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FC 

$FIELDtype  Sstring[2] 

$Comment  Frame  Control  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  DA 

$FIELDtype  Sstring[12] 

$Comment  Destination  Address  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  SA 

$FIELDtype  Sstring[12] 

$Comment  Source  Address  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  INFO 

$FIELDtype  Sstring [ 8956] 

$Comment  INFOrmation  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FCS 

$FIELDtype  Sstring [8] 

$Comment  Frame  Check  Sequence  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  ED 

$FIELDtype  Sstring [1] 

$Comment  Ending  Delimiter  $End_FIELDdcl 

$FIELDdcl 

$FIELDid  FS 

$FIELDtype  Sstring [3] 

$Comment  Frame  Status  $End_FIELDdcl  $End_PCI  $End_TTCN_PDUdcl 

$Begin_TTCN_PDUdcl 

$PDUid  TOKEN_Strip 

$Comment  MAC  Nonrestricted  Token  Stripped 
$PCI 

$FIELDdcl 
$FIELDid  PA 
$FIELDtype  Sstring [16] 

$Comment  Preamble  $End_FIELDdcl 
$FIELDdcl 
$FIELDid  SD 
$FIELDtype  Sstring [2] 

$Comment  Starting  Delimiter  $End_FIELDdcl 

73 


$FIELDdcl 
$FIELDid  FC 
$FIELDtype  Sstring[2] 

$CoiTiment  Frame  Control  $End__FIELDdcl 

$FIELDdcl 

$FIELDid  ED 

$FIELDtype  Sstring[23 

$Comment  Ending  Delimiter  $End__FIELDdcl  $End_PCI  $End_TTCN__PDUdcl 

$Begin_TTCN_PDUdcl 

$PDUid  IDLE 

$PCI 

$FIELDdcl 

$FIELDid  Singleldle 
$FIELDtype  Sstring[l] 

$Comment  A single  Idle  symbol  is  sent  by  Tester.  $End_FIELDdcl  $End__PCI  $End_TTCN__PE 

$Begin_TIMERdcls 

$TIMERdcl 

$TimerTypeId  TVX 

$D-uration  2621  us 

$Comment  Valid  Transmission  Timer.  This  is  the  default  value  of  timeout.  $End__TIMERc 

$TIMERdcl 

$TimerTypeId  TRT 

$Duration  TTRT  us 

$Coinment  Token-Rotation  Timer.  $End__TIMERdcl  $End__TIMERdcls  $End__Declarations 

$DynamicPart 

$TestCases 

$TestGroup  $TestGroupID  MAC 
$TestGroup  $TestGroupID  BASIC 
$Begin__TestCase 

$TestCaseRef  FDDI/MAC/BASIC/FrameTransmit 
$TestCaseId  FrameTransmit 

$TestPurpose  Testing  MAC  Frame  Transmission 

$BehaviourDescription 

$TreeHeader  FrameTransmit 

$ Behaviour Line 

$Line  [ 1] +FDDI/INITCONNECT 

$Coiranent  Initializing  Connection  $End__BehaviourLine 

$BehaviourLine 

$Line  [2]  !ECHO__Req 

$CRef  ECHO_Re^Tl 

$Comment  Tester's  ECHO  Request  Frame  (DA=^IUT  Address).  $End__BehaviourLine 

$BehaviourLine 

$Line  [3] ! TOKEN 

$CRef  T0KEN_T1 

$Comment  Tester  releases  Token  to  lUT.  $End__BehaviourLine 

$BehaviourLine 

$Line  [ 4] ?ECHO_Resp 

$CRef  ECHO_Resp_Rl 

$Comment  lUT  sends  ECHO  Response  back.  $End__BehaviourLine 

$BehaviourLine 

$Line  [53?TOKEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Comment  Tester  receives  Token  from  lUT.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 5] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?TIME0UT  TRT 

$Verdict  F $End__BehaviourLine 

$BehaviourLine 

$Line  [ 4] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [4]7TIMEOUT  TRT 

$Verdict  F $End__BehaviourLine  $End__BehaviourDescription 
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$ExtComments  . $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/BASIC/FrameRepeat 
$TestCaseId  FrameRepeat 

$TestPurpose  Testing  MAC  Frame  Repeating 

$BehaviourDescription 

$TreeHeader  FrameRepeat 

$ Behaviour Line 

$Line  [ 1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 
$ Behaviour Line 
$Line  [2] !DATA 
$CRef  DATA_T1 

$Comment  Sending  Tester  Frame  (DAOIUT  Address).  $End_BehaviourLine 

$BehaviourLine 

$Line  [3]?DATA 

$CRef  DATA_R1 

$Verdict  P 

$Comment  Tester  gets  the  Tester  frame  repeated  (A=R;  C=R;  E=R) . $End_BehaviourLine 

$BehaviourLine 

$Line  [ 3] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [3]?TIME0UT  TRT 

$Verdict  I $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/BASIC/FrameReceive 
$TestCaseId  FrameReceive 

$TestPurpose  Testing  MAC  Frame  Receiving 

$BehaviourDe script ion 

$TreeHeader  FrameReceive 

$BehaviourLine 

$Line  [ 1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 

$BehaviourLine 

$Line  [2] !DATA 

$CRef  DATA_T2 

$Comment  Tester  sends  the  frame {DA=IUT  Address).  $End_BehaviourLine 

$BehaviourLine 

$Line  [3]?DATA 

$CRef  DATA_R2 

$Verdict  P 

$Comment  Tester  gets  the  frame  (A=S;  C=S;  E=R)  received  by  lUT.  $End_BehaviourLine 

$BehaviourLine 

$Line  [3] 70THERWISE 

$Verdict  F $End_BehaviourLine . 

$BehaviourLine 
$Line  [3]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/BASIC/FrameStrip 
$TestCaseId  FrameStrip 

$TestPurpose  Testing  MAC  Frame  Stripping 

$BehaviourDescription 

$TreeHeader  FrameStrip 

$ Behaviour Line 

$Line  [ 1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection.  $End_BehaviourLine 

$BehaviourLine 

$Line  [2] !ECHO_Req 

$CRef  ECHO_Req_Tl 

$Comment  Tester  sends  SMT  ECHO  Request  frame,  $End_BehaviourLine 

$BehaviourLine 

$Line  [3] ! TOKEN 

$CRef  T0KEN_T1 

$Comment  and  then  issues  Token.  $End  BehaviourLine 
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$BehaviourLine 
$Line  [ 4 ] ?ECHO_Resp 
$CRef  ECHO_Resp_Rl 

$CoiTiinent  lUT  sends  SMT  ECHO  Response  frame,  $End__BehaviourLine 

$BehaviourLine 

$Line  [5]?TOKEN  START  TRT 

$CRef  TOKEN_Rl 

$Cornment  and  issues  Token  to  Tester.  $End_BehaviourLine 

$BehaviourLine 

$Line  [6] !ECHO_Resp 

$CRef  ECHO_Resp_Tl 

$Comment  Tester  received  ECHO  Response  and  returns  this  frame  to  lUT.  $End_Behavioui 

$ Behaviour Line 

$Line  [ 7 ] ?DATA_Strip 

$CRef  DATA_Strip_R6 

$Verdict  P 

$Comment  lUT  strips  this  frame.  $End_BehaviourLine 

$ Behaviour Line 

$Line  [ 7] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [7]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 5] 70THERWISE 

$Verdict  I $End_BehaviourLine 

$ Behaviour Line 

$Line  [5]?TIME0UT  TRT 

$Verdict  I $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] 70THERWISE 

$Verdict  I $End_BehaviourLine 

$ Behaviour Line 

$Line  [4]?TIME0UT  TRT 

$Verdict  I $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase  $End_TestGrouj 

$TestGroup  $TestGroupID  CLAIMTOKEN 

$Begin_TestCase 

$TestCaseRef  FDDI/MAC/CLAIMTOKEN/TesterWinClaim 
$TestCaseId  TesterWinClaim 

$TestPurpose  Testing  MAC  Claim  Token  Process  1:  Tester  wins  Claim  Token 

$BehaviourDe script ion 

$TreeHeader  TesterWinClaim 

$BehaviourLine 

$Line  [ 1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 

$BehaviourLine 

$Line  [2] 7TIME0UT  TVX (a :=1) 

$ Label  A 

$Comment  Tester  holds  Token  and  sends  Idle  symbols  until  TVX  expires.  $End_Behavioui 
$ Behaviour Line 
$Line  [2]! IDLE 

$CRef  IDLE_I  $End__BehaviourLine 
$BehaviourLine 

$Line  [3] [a=0]  $End_BehaviourLine 
$BehaviourLine 

$Line  [4] GOTO  A $End_BehaviourLine 
$BehaviourLine 

$Line  [3] START  TRT,  TRTclaim,  T_Max  $End_BehaviourLine 
$BehaviourLine 

$Line  [4]7CLAIM  START  TRT,  TRTclaim,  T_Max 
$CRef  CLAIM_R1 

$Comment  lUT  issues  Claim  frame.  $End__BehaviourLine 

$BehaviourLine 

$Line  [5] ‘CLAIM 

$CRef  CLAIM_T2 

$Cornment  Tester  issues  its  Claim  frame  with  highest  T_Bid.  $End_BehaviourLine 
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$BehaviourLine 

$Line  [6]?CLAIM  START  TRT 

$CRef  CLAIM_R2 

$Comment  lUT  repeats  Tester  Claim  Frame.  $End_BehaviourLine 

$BehaviourLine 

$Line  [7] ! TOKEN 

$CRef  TOKEN_Tl 

$Comment  Tester  issues  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [8]?T0KEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Comment  lUT  repeats  Token.  $End_BehaviourLine 

$ Behaviour Line 

$Line  [ 8 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [8]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 6] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [6]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [4]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/CLAIMTOKEN/IUTWinClaim 
$TestCaseId  lUTWinClaim 

$TestPurpose  Testing  MAC  Claim  Token  process  2:  lUT  wins  Claim  Token 

$BehaviourDescription 

$TreeHeader  lUTWinClaim 

$BehaviourLine 

$Line  [1] +FDDI/INITCONNECT  $End_BehaviourLine 

$ Behaviour Line 

$Line  [2]?TIME0UT  TVX(a:=l) 

$Label  B $End_BehaviourLine 
$ Behaviour Line 
$Line  [2] !IDLE 
$CRef  IDLE_I 

$Comment  Tester  holds  Token  and  sends  Idle  symbols  until  TVX  expires.  $End_Behavioui 
$BehaviourLine 

$Line  [3] [a=0]  $End_BehaviourLine 
$BehaviourLine 

$Line  [4] GOTO  B $End_BehaviourLine 
$BehaviourLine 

$Line  [3] START  TRT,  TRTclaim,  T_Max  $End_BehaviourLine 
$BehaviourLine 

$Line  [4]?CLAIM  START  TRT,  TRTclaim,  T_Max 
$CRef  CLAIM_R1 

$Comment  lUT  issues  Claim  frame.  $End_BehaviourLine 

$BehaviourLine 

$Line  [5] ICLAIM 

$CRef  CLAIM_T3 

$Comment  Tester  issues  its  Claim  frame  with  lowest  T_Bid.  $End_BehaviourLine 

$BehaviourLine 

$Line  [6]?CLAIM 

$CRef  CLAIM_R1 

$Comment  lUT  issues  its  Claim  frame  again.  $End_BehaviourLine 

$BehaviourLine 

$Line  [7] ICLAIM  START  TRT 
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$CRef  CLAIM__T1 

$Comment  Tester  repeats  lUT's  Claim  frame.  $End__BehaviourLine 

$BehaviourLine 

$Line  [8]?T0KEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Comment  lUT  issues  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 8 ] 70THERWISE 

$Verdict  F $End__BehaviourLine 

$BehaviourLine 

$Line  [8]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [6] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [6]?TIME0UT  TRT 

$Verdict  F $End__BehaviourLine 

$BehaviourLine 

$Line  [ 4] 70THERWISE 

$Verdict  F $End__BehaviourLine 

$ Behaviour Line 

$Line  [4]?TIME0UT  TRT 

$Verdict  F $End__BehaviourLine  $End_BehaviourDescription  $End__TestCase  $End__TestGrouj 

$TestGroup  $TestGroupID  BEACONING 

$Begin__TestCase 

$TestCaseRef  FDDI/MAC/BEACONING/TesterGotOwnBeacon 
$TestCaseId  TesterGotOwnBeacon 

$TestPurpose  Testing  MAC  Beacon  process  1:  Tester  receives  its  own  Beacon 

$BehaviourDescription 

$TreeHeader  TesterGotOwnBeacon 

$BehaviourLine 

$Line  [ 1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 

$BehaviourLine 

$Line  [2]?TIME0UT  TVX(a:-l) 

$Label  C 

$Comment  Tester  holds  Token  and  sends  Idle  symbols  until  TVX  expires.  $End__Behavioui 

$BehaviourLine 

$Line  [2] ! IDLE 

$CRef  IDLE__I  $End__BehaviourLine 
$BehaviourLine 

$Line  [3]  [a=0]  $End__BehaviourLine 
$BehaviourLine 

$Line  [4]  GOTO  C $End__BehaviourLine 
$BehaviourLine 

$Line  [3]  START  TRT,  TRTclaim,  T__Max  $End__BehaviourLine 

$BehaviourLine 

$Line  [4]?CLAIM 

$CRef  CLAIM_R1 

$Comment  lUT  issues  Claim  frame.  $End__BehaviourLine 

$BehaviourLine 

$Line  [5]?TIME0UT  TRT 

$Coin[nent  Tester  holds  lUT's  Claim  frame  to  cause  that  the  Claim  Token  process  fails. 
$BehaviourLine 

$Line  [6] START  TRT,  TRTbeacon,  T_Max  $End_BehaviourLine 

$BehaviourLine 

$Line  [7]?BEACON 

$CRef  BEAC0N_R1 

$Comment  lUT  issues  Beacon  frame.  $End__BehaviourLine 

$BehaviourLine 

$Line  [8] ! BEACON 

$CRef  BEAC0N_T2 

$Comment  Tester  holds  lUT's  Beacon  frame  and  issues  its  own  Beacon  frame.  $End_Beha\ 
$BehaviourLine 
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$Line  [9]?BEAC0N  START  TRT,  TRTclaim,  T_Max 
$CRef  BEAC0N_R2 

$Comment  lUT  repeats  Tester's  Beacon  frame.  $End_BehaviourLine 

$BehaviourLine 

$Line  [10]! CLAIM 

$CRef  CLAIM_T4 

$Coinment  After  Tester  receives  its  own  Beacon  frame,  it  sends  Claim  frame.  $End_Behc 

$ Behaviour Line 

$Line  [11]?CLAIM  START  TRT 

$CRef  CLAIM_R4 

$Comment  lUT  repeats  Tester's  Claim  frame.  $End_BehaviourLine 
$ Behaviour Line 
$Line  [12]! TOKEN 
$CRef  T0KEN_T1 

$Comment  Tester  issues  Token  after  it  receives  its  own  Claim  frame.  $End_BehaviourLi 

$BehaviourLine 

$Line  [13]?TOKEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Comment  lUT  repeats  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [13] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [13]?TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 11 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ll]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 9] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [9]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [7] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [7]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] 70THERWISE 

$Verdict  I $End_BehaviourLine 

$BehaviourLine 

$Line  [4]7TIMEOUT  TRT 

$Verdict  I $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI /MAC/BEACONING/ lUTGotOwnBeacon 
$TestCaseId  lUTGotOwnBeacon 

$TestPurpose  Testing  MAC  Beacon  process  2 : lUT  receives  its  own  Beacon 

$BehaviourDescription 

$TreeHeader  lUTGotOwnBeacon 

SBehaviourLine 

$Line  [ 1] +FDDI/ INITCONNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 

$BehaviourLine 

$Line  [2]7TIMEOUT  TVX(a;=l) 

$ Label  D 

$Comment  Tester  holds  Token  and  sends  Idle  symbols  until  TVX  expires.  $End_Behavioui 

$BehaviourLine 

$Line  [2]! IDLE 

$CRef  IDLE  I $End  BehaviourLine 
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$BehaviourLine 

$Line  [3] [a“0]  $End_BehaviourLine 
$BehaviourLine 

$Line  [4] GOTO  D $End_BehaviourLine 
$BehaviourLine 

$Line  [3] START  TRT,  TRTclaim,  T_Max  $End_BehaviourLine 

$BehaviourLine 

$Line  [4]?CLAIM 

$CRef  CLAIM_R1 

$Comment  lUT  issues  Claim  frame.  $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?TIME0UT  TRT 

$Comment  Tester  holds  lUT's  Claim  frame  to  cause  that  the  Claim  frame  fails.  $End_B€ 
$ Behaviour Line 

$Line  [6] START  TRT,  TRTbeacon,  T_Max  $End_BehaviourLine 
$ Behaviour Line 
$Line  [7]?BEAC0N 
$CRef  BEAC0N_R1 

$Comment  lUT  issues  Beacon  frame.  $End_BehaviourLine 
$BehaviourLine 

$Line  [8]!BEAC0N  START  TRT,  TRTclaim,  T_Max 
$CRef  BEAC0N_T1 

$Comment  Tester  repeats  lUT's  Beacon  frame.  $End_BehaviourLine 
$ Behaviour Line 
$Line  [9]?CLAIM 
$CRef  CLAIM_R1 

$Comment  After  lUT  receives  its  own  Beacon  frame,  it  issues  Claim  frame.  $End_Behavj 

$BehaviourLine 

$Line  [10]! CLAIM  START  TRT 

$CRef  CLAIM_T1 

$Comment  Tester  repeats  lUT's  Beacon  frame.  $End_BehaviourLine 

$BehaviourLine 

$Line  [11]?T0KEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Comment  After  lUT  wins  Claim  Token  process,  it  issues  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 11] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [ll]?TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [ 9] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [9]?TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [7] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [7]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4] 70THERWISE 

$Verdict  I $End_BehaviourLine 

$BehaviourLine 

$Line  [4]7TIMEOUT  TRT 

$Verdict  I $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase  $End_TestGrouf 

$TestGroup  $TestGroupID  TTRP 

$Begin_TestCase 

$TestCaseRef  FDDI /MAC /TTRP /Ear lyToken 
$TestCaseId  EarlyToken 

$TestPurpose  Testing  MAC  Timed  Token  Rotation  protocol (TTRP)  1:  Tester  receives  Ear] 
$BehaviourDescription 


80 


$TreeHeader  EarlyToken 
$BehaviourLine 

$Line  [1] +FDDI/INITCONNECT  $Enci_BehaviourLine 
$ Behaviour Line 
$Line  [2] !ECHO_Req 
$CRef  ECHO_Req_Tl 

$Comment  Tester  sends  SMT  ECHO  Request  frame.  $End_BehaviourLine 

$BehaviourLine 

$Line  [3] ! TOKEN 

$CRef  T0KEN_T1 

$Comment  Tester  issues  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] ?ECHO_Resp 

$CRef  ECHO_Resp_Rl 

$Comment  lUT  returns  ECHO  Response  frame.  $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?T0KEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Comment  lUT  returns  Token  (TRT<TTRT) . $End_BehaviourLine 

$ Behaviour Line 

$Line  [5] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [ 4 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [4]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/TTRP/LateToken 
$TestCaseId  LateToken 

$TestPurpose  Testing  MAC  Timed  Token  Rotation  Protocol (TTRP ) 2:  Tester  receives  Late 

$BehaviourDescription 

$TreeHeader  LateToken 

$ Behaviour Line 

$Line  [1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 

$BehaviourLine 

$Line  [2] !ECHO_Req 

$CRef  ECHO_Req_Tl 

$Comment  Tester  sends  SMT  ECHO  Request  frame,  $End_BehaviourLine 
$ Behaviour Line 

$Line  [3]?TIME0UT  TRT  $End_BehaviourLine 
$BehaviourLine 

$Line  [4] START  TRT  $End_BehaviourLine 

$BehaviourLine 

$Line  [5] ! TOKEN 

$CRef  T0KEN_T1 

$Comment  and  issues  Late  Token  when  TTRT<TRT<2xTTRT . $End_BehaviourLine 

$BehaviourLine 

$Line  [6]?T0KEN  START  TRT 

$CRef  T0KEN_R1 

$Comment  lUT  returns  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [7] !ECHO_Req 

$CRef  ECHO_Req_Tl 

$Comment  Tester  sends  SMT  ECHO  Request  frame  again,  $End_BehaviourLine 
$BehaviourLine 

$Line  [8]?TIME0UT  TRT  $End_BehaviourLine 
$BehaviourLine 

$Line  [9] START  TRT  $End_BehaviourLine 
$BehaviourLine 
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$Line  [10] ! TOKEN 
$CRef  TOKEN_Tl 

$Comment  and  issues  Late  Token  again  when  TTRT<TRT<2xTTRT . $End__BehaviourLine 

$BehaviourLine 

$Line  [ll]?TOKEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Comment  lUT  returns  Token.  $End__BehaviourLine 

$BehaviourLine 

$Line  [ 11 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ll]?TIMEOUT  TRT 

$Verdict  F $End__BehaviourLine 

$ Behaviour Line 

$Line  [ 6] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [6]?TIMEOUT  TRT 

$Verdict  F $End__BehaviourLine  $End__BehaviourDescription  $End__TestCase  $End__TestGrou5 

$TestGroup  $TestGroupID  MONITORING 

$Begin_TestCase 

$TestCaseRef  FDDI/MAC/MONITORING/TRTtesting 
$TestCaseId  TRTtesting 

$TestPurpose  Testing  MAC  Monitoring  function  1:  TRT  Monitoring  Function 

$BehaviourDescription 

$TreeHeader  TRTtesting 

$BehaviourLine 

$Line  [ 1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 

$BehaviourLine 

$Line  [2] !ECHO_Req 

$CRef  ECHO_Req^Tl 

$Comment  Tester  sends  SMT  ECHO  Request  frame.  $End__BehaviourLine 

$BehaviourLine 

$Line  [3] 7TIMEOUT  TRT 

$Comment  Causing  TRT  expired.  $End__BehaviourLine 
$BehaviourLine 

$Line  [4]  START  TRT  $End__BehaviourLine 

$BehaviourLine 

$Line  [5J7TIMEOUT  TRT 

$Comment  Causing  TRT  expired  twice  and  Token  never  has  been  seen.  $End_BehaviourLin€ 
$BehaviourLine 

$Line  [6]  START  TRT,  TRTclaim,  T_Max  $End__BehaviourLine 

$BehaviourLine 

$Line  [7]?CLAIM 

$CRef  CLAIM_R1 

$Comment  lUT  initiates  Claim  Token  process.  $End__BehaviourLine 

$BehaviourLine 

$Line  [8] ! CLAIM  START  TRT 

$CRef  CLAIM_T1 

$CoxTiment  Tester  repeats  Claim  frame.  $End__BehaviourLine 

$BehaviourLine 

$Line  [9]?TOKEN 

$CRef  TOKEN_Rl 

$Verdict  P 

$Comment  lUT  issues  Token.  $End__BehaviourLine 

$BehaviourLine 

$Line  [ 9] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [9]7TIMEOUT  TRT 

$Verdict  F $End__BehaviourLine 

$BehaviourLine 

$Line  [ 7] 70THERWISE 

$Verdict  F $End  BehaviourLine 
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$BehaviourLine 
$Line  [7]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/MONITORING/TVXtesting 
$TestCaseId  TVXtesting 

$TestPurpose  Testing  MAC  Monitoring  function  2:  TVX  Monitoring 

$BehaviourDe script ion 

$TreeHeader  TVXtesting 

$ Behaviour Line 

$Line  [ 1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection (test  group)  $End_BehaviourLine 

$ Behaviour Line 

$Line  [2] +TVX_SUBTREE1 

$Comment  Subtree  1 $End_BehaviourLine 

$BehaviourLine 

$Line  [3] +FDDI/INITCONNECT 

$Comment  Initializing  Connection (test  group)  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] +TVX_SUBTREE2 

$Comment  Subtree  2 $End_BehaviourLine 

$TreeHeader  TVX_SUBTREE1 

$BehaviourLine 

$Line  [1] ! DATA_OverMaxLen 

$CRef  DATA_OverMaxLen_Tl 

$CoiTiment  Tester  sends  tester  frame  (DA=IUT  Address;  Frame  symbol  time>TVX)  , to  cause 
$ Behaviour Line 

$Line  [2] START  TRT,  TRTclaim,  T_Max  $End_BehaviourLine 
$ Behaviour Line 
$Line  [3]?CLAIM 
$CRef  CLAIM_R1 

$Comment  lUT  initiates  Claim  Tolcen  process.  $End_BehaviourLine 

$BehaviourLine 

$Line  [4] ! CLAIM  START  TRT 

$CRef  CLAIM_T1 

$Comment  Tester  repeats  the  Claim  frame  sent  by  lUT.  $End_BehaviourLine 

$ Behaviour Line 

$Line  [5]?T0KEN 

$CRef  T0KEN_R1 

$Verdict  (P) 

$Comment  lUT  issues  To)cen.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 5] 70THERWISE 

$Verdict  (F)  $End_BehaviourLine 

$ Behaviour Line 

$Line  [5]?TIME0UT  TRT 

$Verdict  (F)  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 3] 70THERWISE 

$Verdict  (F)  $End_BehaviourLine 

$ Behaviour Line 

$Line  [3]?TIME0UT  TRT 

$Verdict  (F)  $End_BehaviourLine 

$TreeHeader  TVX_SUBTREE2 

$BehaviourLine 

$Line  [1]?TIME0UT  TVX(a:=l) 

$ Label  E 

$Comment  Holds  To}cen  and  sends  Idle  symbols  until  TVX  expires.  $End_BehaviourLine 
$BehaviourLine 
$Line  [1]!IDLE 

$CRef  IDLE_I  $End_BehaviourLine 
$BehaviourLine 

$Line  [2] [a=0]  $End_BehaviourLine 
$BehaviourLine 

$Line  [3] GOTO  E $End_BehaviourLine 
$BehaviourLine 
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$Line  [2] START  TRT,  TRTclaim,  T_Max  $End_BehaviourLine 
$ Behaviour Line 
$Line  [3]?CLAIM 
$CRef  CLAIM_R1 

$Comment  lUT  starts  Claim  Token  process.  $End_BehaviourLine 

$BehaviourLine 

$Line  [4] ! CLAIM  START  TRT 

$CRef  CLAIM_T1  $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?T0KEN 

$CRef  T0KEN_R1 

$Verdict  R $End_BehaviourLine 

$BehaviourLine 

$Line  [ 5] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [5]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [ 3] 70THERWISE 

SVerdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [3]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase  $End_TestGrou5 

$TestGroup  $TestGroupID  FED 

$Begin_TestCase 

$TestCaseRef  FDDI/MAC/FED/PHInvalidRlOb 
$TestCaseId  PKInvalidRlOb 

$TestPurpose  Testing  MAC  Frame  Error  Detection  1:  R{10b)  — a transition  at  MAC  rec€ 

$BehaviourDescription 

$TreeHeader  PHInvalidRlOb 

$ Behaviour Line 

$Line  [ 1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 
$ Behaviour Line 
$Line  [2] !DATA 
$CRef  DATA_T3 

$Comment  Tester  sends  the  f rame (DA=IUT  Address;  A Invalid  Symbol  in  PA)  $End_Behavic 

$BehaviourLine 

$Line  [3] ! TOKEN 

$CRef  T0KEN_T1 

$Comment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4] ?DATA_Strip 

$CRef  DATA_Strip__Rl 

$Comment  Idles  returned  $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?TOKEN 

$CRef  TOKEN_Rl 

$Verdict  P 

$Comment  followed  by  Token.  $End_BehaviourLine 

$ Behaviour Line 

$Line  [ 5] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [5]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [4]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/FED/PHInvalidR20b 
$TestCaseId  PHInvalidR20b 
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$TestPurpose  Testing  MAC  Frame  Error  Detection  2:  R(20b)  — a transition  at  MAC  rec€ 

$BehaviourDescription 

$TreeHeader  PHInvalidR20b 

$ Behaviour Line 

$Line  [ 1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection  $End__BehaviourLine 

$BehaviourLine 

$Line  [2] IDATA 

$CRef  DATA_T4 

$Comment  Tester  sends  the  f rame (DA=IUT  Address;  a Invalid  Symbol  after  J in  SD)  $Enc 
$ Behaviour Line 
$Line  [3] ! TOKEN 
$CRef  T0KEN_T1 

$Comment  followed  by  Token.  $End_BehaviourLine 
$ Behaviour Line 
$Line  [ 4 ] ?DATA_Strip 
$CRef  DATA_Strip_Rl 

$Comment  PA  returned,  $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?T0KEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Comment  followed  by  Token.  $End_BehaviourLine 

$ Behaviour Line 

$Line  [ 5] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [5]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [4J7TIMEOUT  TRT 

SVerdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/FED/PHInvalidR30b 
$TestCaseId  PHInvalidR30b 

$TestPurpose  Testing  MAC  Frame  Error  Detection  3:  R(30b)  — a transition  at  MAC  rec€ 

$BehaviourDescription 

$TreeHeader  PHInvalidR30b 

$BehaviourLine 

$Line  [ 1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 
$ Behaviour Line 
$Line  [2] IDATA 
$CRef  DATA_T5 

$Comment  Tester  sends  the  frame (DA=IUT  Address;  a Invalid  Symbol  in  INFO)  $End_Beha\ 
$ Behaviour Line 
$Line  [3] ! TOKEN 
$CRef  T0KEN_T1 

$Comment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] 7DATA_Strip 

$CRef  DATA_Strip_R2 

$Comment  PA, SD, FC, DA, SA  and  Idles  returned,  $End_BehaviourLine 

$ Behaviour Line 

$Line  [5]7TOKEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Comment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 5] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [5]7TIMEOUT  TRT 
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$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [4]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/FED/PHInvalidR40b 
$TestCaseId  PHInvalidR40b 

$TestPurpose  Testing  MAC  Frame  Error  Detection  4:  R(40b}  — a transition  at  MAC  rece 
$BehaviourDescription 
$TreeHeader  PHInvalidR4 Ob 
$ Behaviour Line 

$Line  [ 1] +FDDI/INITCONNECT  $End_BehaviourLine 
$ Behaviour Line 
$Line  [2] !DATA 
$CRef  DATA_T6 

$Comment  Tester  sends  the  frame (DA=IUT  Address;  a Invalid  Symbol  in  FS)  $End_Behavic 

$BehaviourLine 

$Line  [3] ! TOKEN 

$CRef  TOKEN_Tl 

$Comment  followed  by  Token.  $End_BehaviourLine 
$ Behaviour Line 
$Line  [ 4 ] ?DATA_Strip 
$CRef  DATA_Strip_R4 

$Comment  PA,  SD,  FC,  DA,  SA,  INFO,  FCS,  ED  and  FS  returned (E=S,  A=S,  C=S)  $End_Beha\ 

$ Behaviour Line 

$Line  [5]?TOKEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Comment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 5] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [5]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [ 4 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [4]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/FED/DetectSD 
$TestCaseId  DetectSD 

$TestPurpose  Testing  MAC  Frame  Error  Detection  5:  Detecting  SD 

$BehaviourDescription 

$TreeHeader  DetectSD 

$BehaviourLine 

$Line  [1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 

$BehaviourLine 

$Line  [2] !DATA 

$CRef  DATA_T7_0 

$Comment  Tester  sends  the  f rame (DA=IUT  Address;  an  Idle  Symbol  after  J)  $End_Behavic 

$BehaviourLine 

$Line  [3] ! TOKEN 

$CRef  TOKEN_Tl 

$Comment  Followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [4] 7DATA_Strip 

$CRef  DATA_Strip_Rl 

$Comment  PA  and  Idles  returned.  $End_BehaviourLine 
$BehaviourLine 
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$Line  [5]?T0KEN 
$CRef  T0KEN_R1 
$Verdict  (P) 

$Comment  Followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 5] 70THERWISE 

$Verdict  (F)  $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?TIME0UT  TRT 

$Verdict  (F)  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] 70THERWISE 

$ Verdict  (F)  $End_BehaviourLine 

$BehaviourLine 

$Line  [4]?T IMEOUT  TRT 

$Verdict  (F)  $End_BehaviourLine 

$BehaviourLine 

$Line  [5] !DATA  START  TRT 

$CRef  DATA_T7_1 

$Comment  Tester  sends  the  frame (DA=IUT  Address;  other  symbol (not  K symbol)  before  K 

$BehaviourLine 

$Line  [6]! TOKEN 

$CRef  T0KEN_T1 

$Comment  followed  by  Token.  $End_BehaviourLine 
$ Behaviour Line 
$Line  [ 7 ] ?DATA_Strip 
$CRef  DATA_Strip_Rl 

$Comment  PA  and  Idle  returned,  $End_BehaviourLine 

$BehaviourLine 

$Line  [8]?T0KEN 

$CRef  T0KEN_R1 

$Verdict  R 

$Comment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [8] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [8]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 7] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [7]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/FED/DetectFC 
$TestCaseId  DetectFC 

$TestPurpose  Testing  MAC  Frame  Error  Detection  6:  Detecting  FC 

$BehaviourDe script ion 

$TreeHeader  DetectFC 

$BehaviourLine 

$Line  [ 1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 
$ Behaviour Line 
$Line  [2] !DATA 
$CRef  DATA_T8 

$Comment  Tester  sends  the  f rame (DA=IUT  Address;  a symbol  sequence (not  Idle(s)  or  nn) 
$ Behaviour Line 
$Line  [3] ’TOKEN 
$CRef  TOKEN_Tl 

$Comment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] 7DATA_Strip 

$CRef  DATA_Strip_R5 

$Comment  PA,  SD  and  Idles  returned,  $End  BehaviourLine 
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$BehaviourLine 
$Line  [5]?T0KEN 
$CRef  T0KEN_R1 
$Verdict  P 

$Comment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

SLine  [ 5] ?OTHERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [5]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [4]?TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/FED/DetectFrameBodyl 
$TestCaseId  DetectFrameBodyl 

$TestPurpose  Testing  MAC  Frame  Error  DEtection  7;  Detecting  Frame  Body  1 

$BehaviourDescription 

$TreeHeader  DetectFrameBodyl 

$BehaviourLine 

$Line  [ 1] +FDDI/INITCONNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 
$ Behaviour Line 
$Line  [2] !DATA 
$CRef  DATA_T9 

$Cornment  Tester  sends  the  f rame  (DA=IUT  Address;  an  Idle 'symbol  in  INFO),  $End_Behavj 

$3ehaviourLine 

$Line  [3] ! TOKEN 

$CRef  T0KEN_T1 

$Comment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] ?DATA_Strip 

$CRef  DATA_Strip_R2 

$Comment  PA,  SD,  FC,  DA,  SA  and  Idles  returned,  $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?T0KEN 

$CRef  T0KEN_R1 

$Verdict  P 

$ Comment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 5] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

SBehaviourLine 

$Line  [4]?TIME0UT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/FED/DetectFrameBody2 
$TestCaseId  DetectFrameBody2 

$TestPurpose  Testing  MAC  Frame  Error  Detection  8:  Detecting  Frame  Body  2 

$BehaviourDe script ion 

$TreeHeader  DetectFrameBody2 

$BehaviourLine 

$Line  [1]+FDDI/INITC0NNECT 

$Comment  Initializing  Connection  $End_BehaviourLine 
$BehaviourLine 
$Line  [2] !DATA 
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$CRef  DATA_T10 

$Comment  Tester  sends  the  f rame (DA=IUT  Address;  a symbol (not  Idle  or  data)  in  INFO)/ 

$BehaviourLine 

$Line  [3] ! TOKEN 

$CRef  TOKEN_Tl 

$Comment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] ?DATA_Strip 

$CRef  DATA_Strip_R2 

$Comment  PA,  SD,  FC,  DA,  SA  and  Idles  returned,  $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?T0KEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Comment  followed  by  Token  $End_BehaviourLine 

$ Behaviour Line 

$Line  [5] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [4]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI /MAC /FED /Detect I nvalidLength 
$TestCaseId  DetectInvalidLength 

$TestPurpose  Testing  Frame  Error  Detection  9:  Detecting  Invalid  Data  Length  Frame 

$BehaviourDescription 

$TreeHeader  DetectInvalidLength 

$BehaviourLine 

$Line  [ 1 ] +FDDI/ INITCONNECT  $End_BehaviourLine 

$BehaviourLine 

$Line  [2] !DATA_InvLen 

$CRef  DATA_InvLen_Tl 

$Comment  Tester  sends  the  frame  (DA=IUT  Address;  a Invalid  Data  Length  Frame) , $End_ 

$BehaviourLine 

$Line  [3] ! TOKEN 

$CRef  TOKEN_Tl 

$Comment  followed  by  Token.  $End_BehaviourLine 
$ Behaviour Line 
$Line  [ 4 ] 7DATA_Strip 
$CRef  DATA_Strip_R3 

$Comment  PA,  SD,  FC,  DA,  SA,  INFO,  FCS,  ED  and  FS  returned {A=S,  E=S,  C=R) , $End_Behc 

$BehaviourLine 

$Line  [5J7TOKEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Comment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 5] 7CTHERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [5]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 4 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [4]7TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI /MAC/FED/DetectFCS 
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$TestCaseId  DetectFCS 

$TestPurpose  Testing  Frame  Error  Detection  10:  Detecting  FCS  Errors 

$BehaviourDescription 

$TreeHeader  DetectFCS 

$ Behaviour Line 

$Line  [ 1] +FDDI/INITCONNECT 

$Cornment  Intializing  Connection  $End_BehaviourLine 
$ Behaviour Line 
$Line  [2] !DATA 
$CRef  DATA_T11_0 

$Comment  Tester  sends  the  frame (DA=IUT  Address;  FCS  errors),  $End_BehaviourLine 

$BehaviourLine 

$Line  [3] ! TOKEN 

$CRef  TOKEN_Tl 

$CoiTiment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [4]?DATA 

$CRef  DATA_R11_0 

$Comment  lUT  repeats  Tester's  f rame (A=S , E=S , C=R) , $End__BehaviourLine 
$ Behaviour Line 
$Line  [5]?TOKEN 
$CRef  TOKEN_Rl 

$Comment  Token  returned.  $End_BehaviourLine 

$BehaviourLine 

$Line  [6]! DATA 

$CRef  DATA_T11_1 

$Comment  Tester  sends  the  f rame  (DAOIUT  Address;.  FCS  error),  $End_BehaviourLine 
$ Behaviour Line 
$Line  [7] ! TOKEN 
$CRef  T0KEN_T1 

$Comment  followed  by  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [8]?DATA 

$CRef  DATA_R11_1 

$Comment  lUT  repeats  Tester's  f rame (A-R,  E=S,  C=R)  $End_BehaviourLine 

$ Behaviour Line 

$Line  [9]?TOKEN 

$CRef  T0KEN_R1 

$Verdict  P 

$Coniment  lUT  returns  Token.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 9] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [9]?TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [ 8] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [8]?TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [ 5] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [5]?TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine 

$ Behaviour Line 

$Line  [ 4] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [4]?TIMEOUT  TRT 

$ Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase  $End_TestGrouj 

$TestGroup  $TestGroupID  TED 

$Begin_TestCase 
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$TestCaseRef  FDDI/MAC/TED/PHInvalidR50b 
$TestCaseId  PHInvalidRSOb 

$TestPurpose  Testing  MAC  Token  Error  Detection  1;  R(50b)  — a transition  at  MAC  rec€ 

$BehaviourDescription 

$TreeHeader  PHInvalidRSOb 

$BehaviourLine 

$Line  [ 1 ] +FDDI/ INITCONNECT 

$CoiTiment  Initializing  Connection  $End_BehaviourLine 

$BehaviourLine 

$Line  [2] ! TOKEN 

$CRef  TOKEN_T2 

$Comment  Tester  sends  the  Token  (a  Invalid  Symbol  in  ED) , $End_BehaviourLine 

$BehaviourLine 

$Line  [ 3] ?TOKEN_Strip 

$CRef  TOKEN_Strip_Rl 

$Verdict  P 

$Comment  PA,SD/FC  and  Idles  returned.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 3 ] 70THERWISE 

$Verdict  F $End_BehaviourLine 

$BehaviourLine 

$Line  [3]?TIMEOUT  TRT 

$Verdict  F $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/TED/DetectTokenEDl 
$TestCaseId  DetectTokenEDl 
$TestPurpose  Testing  1 for  ED  of  Token 
$BehaviourDe script ion 
$TreeHeader  DetectTokenEDl 
$BehaviourLine 

$Line  [1] +FDDI/ INITCONNECT  $End_BehaviourLine 
$ Behaviour Line 
$Line  [2] ! TOKEN 
$CRef  TOKEN_T3 

$Comment  Tester  sends  Token (an  Idle  Symbol  in  ED)  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 3] ?TOKEN_Strip 

$CRef  TOKEN_Strip_Rl 

$Verdict  (P) 

$Comment  PA,  SD,  FC  and  Idles  returned.  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 3] 70THERWISE 

$Verdict  (F)  $End_BehaviourLine 

$BehaviourLine 

$Line  [3]7TIMEOUT  TRT 

$Verdict  (F)  $End_BehaviourLine  $End_BehaviourDescription  $End_TestCase 
$Begin_TestCase 

$TestCaseRef  FDDI/MAC/TED/DetectTokenED2 

$TestCaseId  DetectTokenED2 

$TestPurpose  Testing  2 for  the  ED  of  Token 

$BehaviourDescription 

$TreeHeader  DetectTokenED2 

$BehaviourLine 

$Line  [1]+FDDI/INITC0NNECT  $End_BehaviourLine 

$BehaviourLine 

$Line  [2] ! TOKEN 

$CRef  T0KEN_T4 

$Comment  Tester  sends  the  Token  (any  symbol (not  Idles  or  T)  in  ED)  $End_BehaviourLin€ 

$BehaviourLine 

$Line  [3] 7TOKEN_Strip 

$CRef  TOKEN_Strip_Rl 

$Verdict  P 

$Comment  PA,  SD,  FC  and  Idles  returned  $End_BehaviourLine 

$BehaviourLine 

$Line  [ 3] 70THERWISE 

$Verdict  F $End  BehaviourLine 
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$BehaviourLine 
$Line  [3]?TIME0UT  TRT 

$Verdict  F $End__BehaviourLine  $End_BehaviourDescription  $End__TestCase  $End_TestGrouj 

$End_Test Cases 

$TestStepLibrary 

$Begin__TestStep 

$TestStepRef  FDDI/INITCONNECT 

$TestStepId  INITCONNECT 

$Objective  to  complete  ring  initialization  and  form  a Token  path  for  test  cases 

$BehaviourDescription 

$TreeHeader  INITCONNECT 

$ Behaviour Line 

$Line  [1]  (a:=0) 

$End__BehaviourLine  $End__BehaviourDescription 

$End__TestStep 

$End__TestStepLibrary 

$End_DynamicPart 

$ Constraint sPart 

$PDUConstraints 

$Begin__TTCN__PDUconstraint 

$PDUid  DATA 

$ CONS id  DATA_T1 

$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  Tester__Address 
$End_PDU__VALdcl 
$PDU__VALdcl  $FIELDid  SA 

$CONSvalue  Tester__Address 
$End_PDU_VALdcl 
$PDU__VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$E  nd_P  DU__VALdc  1 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M__FCS__Tramt 
$End_PDU__VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End__TTCN__PDUconstraint 
$Begin__TTCN_PDUconstraint 
$PDUid  DATA 
$ CONS  id  DATA__R1 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$ E nd__P  DU__VALdc  1 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001' B 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  DA 
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$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$ CONS value  M_FCS_Rev 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  DATA 
$ CONS id  DATA_T2 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M_FCS_Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010 ' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  DATA 
$ CONS id  DATA_R2 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  DA 
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$CONSvalue  IUT__Ad.dress 
$End_PDU__VALdcl 
$PDU__VALdcl  $FIELDid  SA 

$CONSvalue  Tester__Address 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$ E nd_P  DU_VAL  dc 1 
$PDU_VALdcl  $FIELDid  FCS 

$ CONS value  M_FCS_Rev 
$ E n d__P  DU_VAL  dc  1 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End__PDU__VALdcl 
$PDU__VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101101011 ' B 
$End_PDU_VALdcl 
$End__FVI 

$End_TTCN_PDUconstraint 
$Begin__TTCN__PDUconstraint 
$PDUid  DATA 
$ CONS  id  DATA__T3 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFCIFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001' B 
$ E nd_P  DU_VAL  dc 1 
$PDU__VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  IUT__Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU___VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M__FCS_Tramt 
$End__PDU__VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$ End__P  DU__VALdc  1 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010 ' B 
$End_PDU_VALdcl 
$End_FVI 

$End__TTCN_PDUconstraint 
$Begin_TTCN__PDUconstraint 
$PDUid  DATA 
$ CONS id  DATA_T4 
$FVI 

$PDU__VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$ E nd_P  DU__VALdc  1 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100000000 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  DA 
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$CONSvalue  IUT_Address 
$ E nd__P  DU_VALdc  1 
$PDU__VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU__VALdcl 
$PDU__VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU__VALdcl  $FIELDid  FCS 

$CONSvalue  M_FCS_Tramt 
$ E nd_P  DU_VAL  dc 1 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin__TTCN_PDUconstraint 
$PDUid  DATA 
$ CONS id  DATA_T5 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU__VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  IUT__Address 
$ E nd__P  DU_VALdc  1 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F029552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M__FCS_Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$ End__P  DU_VALdc  1 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  DATA 
$ CONS id  DATA_T6 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  DA 
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$CONSvalue  IUT_Address 
$ E nd_P DU_VALdc 1 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester__Address 
$End__PDU_VALdc  1 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M__FCS__Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100000001010' B 
$End_PDU_VALdcl 
$End__FVI 

$End__TTCN__PDUconstraint 
$Begin__TTCN__PDUconstraint 
$PDUid  DATA 
$ CONS id  DATA_T7_0 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU__VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100011111 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU__VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$ CONS  value  IUT__Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU__VALdcl 
$PDU__VALdcl  $FIELDid  FCS 

$ CONS  value  M__FCS_Tramt 
$End_PDU__VALdcl 
$PDU__VALdcl  $ FIELD  id  ED 

$CONSvalue  ' 10101' B 
$ End_P  DU__VALdc  1 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End__FVI 

$End_TTCN_PDUconstraint 
$Begin__TTCN_PDUconstraint 
$PDUid  DATA 
$ CONS id  DATA_T7_1 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End__PDU__VALdc  1 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1111110001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU__VALdc  1 
$PDU  VALdcl  $FIELDid  DA 
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$CONSvalue  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F2 69552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M_FCS_Tramt 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  DATA 
$ CONS id  DATA_T8 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  ' 0000000100 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$ CONS value  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M_FCS_Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010 ' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  DATA 
$ CONS id  DATA_T9 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$ E nd_P  DU_VAL  dc 1 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  DA 
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$CONSvalue  IUT__Address 
$ E nd__P  DU__VAL  dc  1 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester__Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F7E9552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M_FCS_Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$ E nd_P  DU_VAL  dc 1 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin__TTCN__PDUconstraint 
$PDUid  DATA 
$ CONS  id  DATA__T10 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  IUT_Address 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester__Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F569552DCF' H 
$ E nd_P  DU_VALdc 1 
$PDU__VALdcl  $FIELDid  FCS 

$CONSvalue  M__FCS_Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU__VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010 ' B 
$ E nd_P  DU_VAL  dc 1 
$End_FVI 

$End_TTCN__PDUconstraint 

$Begin_TTCN__PDUconstraint 

$PDUid  DATA 

$ CONS id  DATA_T11_0 

$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  DA 


98 


$ CONS value  IUT_Address 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  ' F7BDEF7BDE ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 

$Begin_TTCN_PDUconstraint 

$PDUid  DATA 

$ CONS id  DATA_R11_0 

$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  IUT_Address 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  ' F7BDEF7BDE ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010110101101010' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 

$Begin_TTCN_PDUconstraint 

$PDUid  DATA 

$ CONS id  DATA_T11_1 

$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  DA 
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. $CONSvalue  Tester_Adciress 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester__Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  ' F7BDEF7BDE' H 
$End_PDU__VALdcl 
$PDU__VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvaliie  ' 010100101001010 ' B 
$ E nd_P  DU_VAL  dc 1 
$End_FVI 

$End__TTCN__PDUconstraint 

$Begin__TTCN__PDUconstraint 

$PDUid  DATA 

$ CONS  id  DATA__R11__1 

$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU__VALdcl  $FIELDid  SA 

$CONSvalue  Tester__Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  ' F7BDEF7BDE' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010110101001010 ' B 
$End_PDU_VALdcl 
$End_FVI 

$End__TTCN__PDUconstraint 
$Begin_TTCN__PDUconstraint 
$PDUid  DATA_InvLen 
$ CONS  id  DATA__InvLen_Tl 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  P_16 
$ End__P  DU_VALdc  1 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' IIOOOIOOOI'B 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  DA 
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$CONSvalue  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M_FCS_Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $ FIELD id  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  DATA_OverMaxLen 
$ CONS id  DATA_OverMaxLen_Tl 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $ FIELD id  DA 

$CONSvalue  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M_FCS_Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $ FIELD id  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  TOKEN 
$ CONS id  TOKEN_Tl 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'lOOOOOOO'B 
$End_PDU_VALdcl 
$PDD  VALdcl  $FIELDid  ED 
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$CONSvalue  ' 1010110101 ' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  TOKEN 
$ CONS id  TOKEN_Rl 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' IIOOOIOOOI'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'lOOOOOOO'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 1010110101' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  TOKEN 
$ CONS id  TOKEN_T2 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'lOOOOOOO'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 0000010101' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  TOKEN 
$ CONS id  TOKEN_T3 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' IIOOOIOOOI'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'lOOOOOOO'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 1111110101' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  TOKEN 
$ CONS id  TOKEN_T4 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  SD 
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$CONSvalue  ' 1100010001 ' B 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'lOOOOOOO'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 1111010101 ' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  CLAIM 
$ CONS id  CLAIM_T1 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOll'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  T_Req_IUT 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  FCS 

$ CONS value  M_FCS_Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010 ' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  CLAIM 
$ CONS id  CLAIM_R1 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOll'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$ CONS value  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  T_Req__IUT 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  FCS 
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$CONSvalue  M_FCS_Rev 
$ E n d_P  DU_VAL  dc 1 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  CLAIM 
$ CONS id  CLAIM_T2 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOll'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$ CONS value  T_Bid_Max 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$ CONS value  M_FCS_Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010 ' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN__PDUconstraint 
$PDUid  CLAIM 
$ CONS id  CLAIM_R2 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOll'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$ CONS value  T_Bid_Max 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  FCS 
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. $CONSvalue  M_FCS_Rev 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  CLAIM 
$ CONS id  CLAIM_T3 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOll'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  T_Bid_Min 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M_FCS_Traint 
$End_PDU_VALdcl 
$PDU_VALdcl  $ FIELD id  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  CLAIM 
$ CONS id  CLAIM_T4 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOll'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  T_Req_Tester 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  FCS 
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$CONSvalue  M__FCS_Tramt 
$End__PDU_VALdcl 
$PDU__VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU__VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End__TTCN__PDUconstraint 
$Begin_TTCN__PDUconstraint 
$PDUid  CLAIM 
$ CONS  id  CLAIM__R4 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$ E nd_P  DU__VAL  dc  1 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOll'B 
$ E nd__P  DU_VALdc  1 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  Tester__Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester__Address 
$End__PDU__VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  T__Req__Tester 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$ CONS  value  M__FCS_Rev 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End__TTCN_PDUconstraint 
$Begin_TTCN__PDUconstraint 
$PDUid  BEACON 
$ CONS  id  BEACON__Tl 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End__PDU__VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU__VALdcl  $FIELDid  FC 

$CONSvalue  'IIOOOOIO'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  ' 000000000000 ' H 
$End_PDU_VALdcl 
$PDU__VALdcl  $FIELDid  SA 

$ CONS value  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  'OOOOOOOO'B 
$End_PDD_VALdcl 
$PDU  VALdcl  $FIELDid  FCS 


106 


$CONSvalue  M_FCS_Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010 ' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  BEACON 
$ CONS id  BEACON_Rl 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'IIOOOOIO'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  ' 000000000000 ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  'OOOOOOOO'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M_FCS_Rev 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  BEACON 
$ CONS id  BEACON_T2 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $ FIELD id  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'IIOOOOIO'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  ' 000000000000 ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  'OOOOOOOO'B 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  FCS 
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$CONSvalue  M__FCS__Tramt 
$ E nd_P  DU__VALdc  1 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$ E nd_P  DU__VAL  dc  1 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010 ' B 
$ E nd__P  DU__VALdc  1 
$End__FVI 

$End_TTCN__PDUconstraint 
$Begin__TTCN__PDUconstraint 
$PDUid  BEACON 
$ CONS id  BEACON_R2 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End_PDU_VALdcl 
$PDU__VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001' B 
$ E nd__P  DU__VAL  dc  1 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'IIOOOOIO'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  ' 000000000000 ' H 
$ E nd_PDU__VALdc  1 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester__Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  'OOOOOOOO'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$ CONS value  M_FCS_Rev 
$End_PDU__VALdcl 
$PDU__VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010' B 
$End_PDU_VALdcl 
$End_FVI 

$End__TTCN__PDUconstraint 
$Begin_TTCN__PDUconstraint 
$PDUid  ECHO__Req 
$CONSid  ECHO  Rea  T1 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001' B 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  '81'H 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$ CONS  value  IUT__Address 
$ E nd__P  DU__VALdc  1 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU__VALdcl 

$PDU__VALdcl  $FIELDid  Frame_Class 
$CONSvalue  '04'H 
$End__PDU_VALdcl 

$PDU__VALdcl  $FIELDid  Fraine_Type 
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$CONSvalue  '02'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Version_ID 
$CONSvalue  'OOOO'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Transaction_ID 
$CONSvalue  ' 00000000' H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Station_ID 

$CONSvalue  ' 0000000000000001 ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  Pad 

$CONSvalue  'OOOO'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Inf oField_Length 
$CONSvalue  '116A'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Parameter_Type 
$CONSvalue  'OOll'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Parameter_Length 
$CONSvalue  '1168'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Echo_data 

$CONSvalue  ' F269552DCF' H 
$End_PDU__VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M_FCS_Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010 ' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  ECHO_Resp 
$ CONS id  ECHO_Resp_Rl 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  '81'H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  IUT_Address 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Frame_Class 
$CONSvalue  '04'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Frame_Type 
$CONSvalue  '03'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Version_ID 
$CONSvalue  'OOOO'H 
$End_PDU_VALdcl 

$PDU  VALdcl  $FIELDid  Transaction  ID 
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. $CONSvalue  'OOOOOOOO'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Station^ID 

$CONSvalue  ' 0000000000000001' H 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  Pad 

$CONSvalue  'OOOO'H 
$End__PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Inf oField_Length 
$CONSvalue  '116A'H 
$End_PDU_VALdcl 

$PDU__VALdcl  $FIELDid  Parameter__Type 
$CONSvalue  'OOll'H 
$ E nd_P  DU__VALdc  1 

$PDU__VALdcl  $FIELDid  Parameter__Length 
$CONSvalue  '1168'H 
$End_PDU_VALdcl 

$PDU__VALdcl  $FIELDid  Echo_data 

$CONSvalue  ' F269552DCF' H 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$ CONS  value  M__FCS_Rev 
$ E nd_P  DU_VALdc 1 
$PDU__VALdcl  $ FIELD  id  ED 

$CONSvalue  ' 10101' B 
$ E nd__P  DU_VAL  dc  1 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101001010 ' B 
$End_PDU_VALdcl 
$End__FVI 

$End__TTCN__PDUconstraint 
$Begin__TTCN_PDUconstraint 
$PDUid  ECHO_Resp 
$ CONS  id  ECHO_Resp__Tl 
$FVI 

$PDU_VALdcl  $FIELDid  PA 

$CONSvalue  ' FFFFFFFFFFFFFFFFFFFF ' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001 ' B 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  '81'H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  Tester__Address 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$ CONS  value  IUT__Address 
$ E nd_P  DU_VALdc 1 

$PDU_VALdcl  $FIELDid  Frame__Class 
$CONSvalue  '04'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Frame_Type 
$CONSvalue  '03'H 
$ E nd_P  DU__VALdc  1 

$PDU_VALdcl  $FIELDid  Version_ID 
$CONSvalue  'OOOO'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Transaction__ID 
$CONSvalue  ' 00000000' H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Station_ID 

$CONSvalue  ' 0000000000000001 ' H 
$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  Pad 


no 


$CONSvalue  'OOOO'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Inf oField_Length 
$CONSvalue  '116A'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Paraineter_Type 
$CONSvalue  'OOll'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Parameter_Length 
$CONSvalue  '1168'H 
$End_PDU_VALdcl 

$PDU_VALdcl  $FIELDid  Echo_data 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$ CONS value  M_FCS_Tramt 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010100101101011' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  DATA_Strip 
$CONSid  DATA_Strip_Rl 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SD 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $ FIELD id  DA 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 
$CONSvalue  - 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  DATA_Strip 
$ CONS id  DATA_Strip_R2 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End_PDU_VALdcl 
$PDU  VALdcl  $FIELDid  SD 
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$CONSvalue  ' 1100010001' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  IUT_Address 
$ E nd_P DU_VALdc 1 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 
$CONSvalue  - 
$ E n d_P  DU_VAL  dc 1 
$PDU_VALdcl  $FIELDid  ED 
$CONSvalue  - 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  FS 
$CONSvalue  - 
$ E n d_P  DU_VAL  dc 1 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  DATA_Strip 
$CONSid  DATA_Strip_R3 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $ FIELD id  SD 

$CONSvalue  ' 1100010001 ' B 
$End__PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 

$ CONS value  M_FCS_Rev 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010110101101010 ' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN__PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  DATA_Strip 
$ CONS id  DATA_Strip_R4 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End_PDU_VALdcl 

$PDU  VALdcl  $FIELDid  SD 
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$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$ E nd_P  DU_VALdc 1 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 

$CONSvalue  ' F269552DCF' H 
$End_PDU_V7VLdcl 
$PDU_VALdcl  $FIELDid  FCS 

$CONSvalue  M_FCS_Rev 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 

$CONSvalue  ' 10101' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 

$CONSvalue  ' 010110101101011' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  DATA_Strip 
$CONSid  DATA_Strip_R5 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End_PDU_VALdcl 
$PDU__VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 
$CONSvalue  - 
$End__PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  DATA_Strip 
$ CONS id  DATA_Strip  R6 
$FVI  “ 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$End__PDU_VALdcl 
$PDU  VALdcl  $FIELDid  SD 
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$CONSvalue  ' 1100010001 ' B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FC 

$CONSvalue  'llOOOOOl'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  DA 

$CONSvalue  Tester_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  SA 

$CONSvalue  IUT_Address 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  INFO 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FCS 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 
$CONSvalue  - 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  FS 
$CONSvalue  - 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN_PDUconstraint 
$PDUid  TOKEN_Strip 
$ CONS id  TOKEN_Strip_Rl 
$FVI 

$PDU_VALdcl  $FIELDid  PA 
$CONSvalue  ? 

$ E n d_P  DU_VAL  dc  1 
$PDU_VALdcl  $FIELDid  SD 

$CONSvalue  ' 1100010001' B 
$End_PDU_VALdcl 
$PDU__VALdcl  $FIELDid  FC 

$CONSvalue  'lOOOOOOO'B 
$End_PDU_VALdcl 
$PDU_VALdcl  $FIELDid  ED 
$CONSvalue  - 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 
$Begin_TTCN__PDUconstraint 
$PDUid  IDLE 
$ CONS id  IDLE_I 
$FVI 

$PDU_VALdcl  $FIELDid  Singleldle 
$CONSvalue  ' 11111' B 
$End_PDU_VALdcl 
$End_FVI 

$End_TTCN_PDUconstraint 

$End_PDUconstraints 

$End  ConstraintsPart  $End  Suite 
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Appendix  C 

FDDI  MAC  Conformance  Test 
C Language  Test  Generated  by  the  TTCN  Translator 
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/*  NIST  TTCN  Translator  Version  1.0  4/89  */ 

♦include  <stdio.h> 

♦include  "suite. h" 

int  _level,  time,  _bufferlen; 


int 


char 

char 


unsigned  char 
verdict 


*_buff er; 
Result; 
*_timername; 
R[10]  ; 


tsparameter  () 


char 


tempstr [80]  ; 


print f ("Enter  test  suite  parameters . \n\n" ) ; 

printfC'The  address  of  Station  Under  Test.  Enter  an  integer . \n" ) / 
scanf("%d",  &IUT_Address) ; 

printfC’The  address  of  Tester.  Get  this  value  from  Tester.  Enter  an  integer.  \n")  ; 
scanf("%d",  &Tester_Address ) ; 

printfC'The  operative  Target  Token  Rotation  Time.  Enter  an  integer . \n" ) ; 
scanf("%d",  4TTRT); 

print f ( "Tester' s Requested  TTRT.  Enter  an  integer . \n") ; 
scanf{"%d",  iT_Req_Tester) ; 

printf ( "lUT' s Requested  TTRT.  Enter  an  integer . \n" ) ; 
scanf("%d",  &T_Req_IUT) ; 

printf ( "Highest  Bidding  Value  of  Tester  in  Claim  Token  Process.  Enter  an  integer. \n") 
scanf("%d",  iT_Bid_Max) ; 

printf ( "Lowest  Bidding  Value  of  Tester  in  Claim  Token  process.  Enter  an  integer . \n") ; 
scanf("%d",  iT_Bid_Min) ; 

printf ( "Enter  an  hexadecimal  string,  e . g. 12CF\n" ) ; 
scanf ("%x",  &M_FCS_Rev) ; 

printf ( "Enter  an  hexadecimal  string,  e. g. 12CF\n") ; 
scanf ("%x",  &M_FCS_Tramt) ; 


main  () 


tsparameter  ()  ; 
initialize  ( ) ; 

Output_trace ("\n\nStarting  test  case  FrameTransmit  ") ; 
flush_queue  ()  ; 

FrameTransmit  ()  ; 

DL_POSTAMBLE  0 ; 

print_verdict ("End  test  case  FrameTransmit  ") ; 

Output_trace ("\n\nStarting  test  case  FrameRepeat  ") ; 
flush_queue  ()  ; 

FrameRepeat  ()  ; 

DL_POSTAMBLE ( ) ; 

print_verdict ("End  test  case  FrameRepeat  ") ; 

Output_trace ("\n\nStarting  test  case  FrameReceive  "); 
flush_queue  ()  ; 

FrameReceive  () ; 

DL_POSTAMBLE()  ; . 

print_verdict ("End  test  case  FrameReceive  "); 

Output_trace ("\n\nStarting  test  case  FrameStrip  "); 
f lush_queue  ()  ; 

FrameStrip  0 ; 

DL_POSTAMBLE ( ) ; 

print_verdict ("End  test  case  FrameStrip  "); 

Output_trace ("\n\nStarting  test  case  TesterWinClaim  "); 
flush_queue  ()  ; 

TesterWinClaim 0 ; 

DL_POSTAMBLE() ; 

Pi’int_verdict  ("End  test  case  TesterWinClaim  "); 

Output_trace ("\n\nStarting  test  case  lUTWinClaim  ") ; 
flush_queue  ()  ; 
lUTWinClaimO  ; 

DL_POSTAMBLE  0 ; 

print_verdict  ("Elnd  test  case  IDTWinClaim  ")  ; 

Output__trace  ("\n\nStarting  test  case  TesterGotOwnBeacon  "); 
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flush_queue  ()  ; 

TesterGotOwnBeacon 0 ; 

DL_POSTAMBLE ( ) ; 

print_verdict ("End  test  case  TesterGotOwnBeacon  "); 
Output_trace ("\n\nStarting  test  case  lUTGotOwnBeacon  ") ; 
flush_queue  ()  ; 
lUTGotOwnBeacon () ; 

DL_POSTAMBLE ( ) ; 

print_verdict ("End  test  case  lUTGotOwnBeacon  ") ; 
Output_trace ("\n\nStarting  test  case  EarlyToken  "); 
flush_queue  ()  ; 

EarlyToken 0 ; 

DL_POSTAMBLE ( ) ; 

print_verdict ("End  test  case  EarlyToken  "); 

Output_trace ("\n\nStarting  test  case  LateToken  ") ; 
flush_queue  ()  ; 

LateToken  ()  ; 

DL_POSTAMBLE ( ) ; 

print_verdict ("End  test  case  LateToken  "); 

Output_trace ("\n\nStarting  test  case  TRTtesting  "); 
flush_queue  ()  ; 

TRTtesting  ( ) ; 

DL_POSTAMBLE  0 ; 

print_verdict ("End  test  case  TRTtesting  "); 

Output_trace ("\n\nStarting  test  case  TVXtesting  "); 
flush_queue  ()  ; 

TVXtesting  ()  ; 

DL_POSTAMBLE  ( ) ; 

print_verdict ("End  test  case  TVXtesting  "); 

Out put_t race ("\n\nStarting  test  case  PHInvalidRlOb  ") ; 
flush_queue  ()  ; 

PHInvalidRlOb  ()  ; 

DL_POSTAMBLE  0 ; 

print_verdict ("End  test  case  PHInvalidRlOb  "); 
Output_trace ("\n\nStarting  test  case  PHInvalidR20b  ") ; 
flush_queue  ()  ; 

PHInvalidR20b  ()  ; 

DL_POSTAMBLE ( ) ; 

print_verdict ("End  test  case  PHInvalidR20b  "); 
Output_trace ("\n\nStarting  test  case  PHInvalidRSOb  ")  ; 
flush_queue  ()  ; 

PHInvalidR30b()  ; 

DL_POSTAMBLE()  ; 

print_verdict ("End  test  case  PHInvalidR30b  ") ; 
Output_trace ("\n\nStarting  test  case  PHInvalidR40b  ") ; 
flush_queue  ()  ; 

PHInvalidR4  0b()  ; 

DL_POSTAMBLE()  ; 

print_verdict ("End  test  case  PHInvalidR40b  "); 
Output_trace ("\n\nStarting  test  case  DetectSD  "); 
flush_queue  ()  ; 

DetectSD  ()  ; 

DL_POSTAMBLE ( ) ; 

print_verdict ("End  test  case  DetectSD  "); 

Output_trace ("\n\nStarting  test  case  DetectFC  "); 
flush_queue  ()  ; 

DetectFC  ()  ; 

DL_POSTAMBLE()  ; 

print_verdict ("End  test  case  DetectFC  "); 

Output_trace ("\n\nStarting  test  case  DetectFrameBodyl  ") 
flush_queue  ()  ; 

DetectFrameBodyl  () ; 

DL_POSTAMBLE  0 ; 

print_verdict ("End  test  case  DetectFrameBodyl  "); 
Output_trace ("\n\nStarting  test  case  DetectFrameBody2  ") 
flush_queue  () ; 
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DetectFrameBody2 () ; 

DL_POSTAMBLE  0 ; 

print__verdict  ("End  test  case  DetectFrameBody2  "); 
Output_trace ("\n\nStarting  test  case  DetectInvalidLength  ") 
flush_queue  ()  ; 

DetectInvalidLength  () ; 

DL_POSTAMBLE  0 ; 

print_verdict ("End  test  case  DetectInvalidLength  ") ; 
Output_trace ("\n\nStarting  test  case  DetectFCS  ") ; 
flush__queue  ()  ; 

DetectFCS  ()  ; 

DL_POSTAMBLE  ()  ; 

print__verdict  ("End  test  case  DetectFCS  ")  ; 

Output_trace ("\n\nStarting  test  case  PHInvalidRSOb  ") ; 
flush_queue  ()  ; 

PHInvalidRSOb  ()  ; 

DL_POSTAMBLE  ( ) ; 

print_verdict ("End  test  case  PHInvalidRSOb  ") ; 

Output_trace ("\n\nStarting  test  case  DetectTokenEDl  "); 
f lush_queue  ()  ; 

DetectTokenEDl  () ; 

DL_POSTAMBLE ( ) ; 

print_verdict ("End  test  case  DetectTokenEDl  "); 

Output_trace ("\n\nStarting  test  case  DetectTokenED2  "); 
flush_queue  ()  ; 

DetectTokenED2  () ; 

DL_POSTAMBLE  ( ) ; 

print_verdict ("End  test  case  DetectTokenED2  "); 
exit ( ) ; 
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/*  NIST  TTCN  Translator  Version  1.0  4/89  */ 

♦include  <stdio.h> 

♦include  "sysdef.h" 
typedef  unsigned  char  BYTE; 
typedef  struct  { 
union  { 

long  v; 

char  *ptr; 


} 

value; 

char 

tag; 

} 

CONSTARG; 

extern 

int 

_level,  _time. 

_bufferlen; 

extern 

unsigned 

char  *_buffer; 

extern 

char 

*_t  i me  m ame ; 

extern 

_verdi ct 

Result; 

extern 

void 

Implicit_send  () 

; 

extern 

char 

R[]; 

extern 

long 

IUT_Address ; 

/* 

The  address  of  Station  Under  Test.  */ 

extern 

long 

Tester_Address; 

/* 

The  address  of  Tester.  Get  this  value  from 

★ 

Tester.  */ 

extern 

long 

TTRT; 

/* 

The  operative  Target  Token  Rotation  Time. 

extern 

long 

T_Req_Tester; 

/* 

Tester's  Requested  TTRT.  */ 

extern 

long 

T_RecL.I0T; 

/* 

lUT' s Requested  TTRT.  */ 

extern 

long 

T_Bid_Max; 

/* 

Highest  Bidding  Value  of  Tester  in  Claim 

★ 

Token  Process.  */ 

extern 

long 

T_Bid_Min; 

/* 

Lowest  Bidding  Value  of  Tester  in  Claim 

•k 

Token  process.  */ 

extern 

long 

M_FCS_Rev; 

extern 

long 

M_FCS__Trarnt ; 

♦define 

T_Max  167772 

/* 

The  maximum 

value  (defai 

♦define 

T_Min  4000 

/* 

The  minimum 

value  (defa; 

♦define 

SO 

Oxle 

/* 

Data 

Symbol 

0 

*/ 

♦define 

SI 

0x09 

/* 

Data 

Symbol 

1 

*/ 

♦define 

S2 

0x14 

/* 

Data 

Symbol 

2 

*/ 

♦define 

S3 

0x15 

/* 

Data 

Symbol 

3 

*/ 

♦define 

S4 

OxOa 

/* 

Data 

Symbol 

4 

*/ 

♦define 

S5 

OxOb 

/* 

Data 

Symbol 

5 

*/ 

♦define 

S6 

OxOe 

/* 

Data 

Symbol 

6 

*/ 

♦define 

S7 

OxOf 

/* 

Data 

Symbol 

7 

*/ 

♦define 

S8 

0x12 

/* 

Data 

Symbol 

8 

* / 

♦define 

S9 

0x13 

/* 

Data 

Symbol 

9 

*/ 

♦define 

sA 

0x16 

/* 

Data 

Symbol 

A 

*/ 

♦define 

SB 

0x17 

/* 

Data 

Symbol 

B 

*/ 

♦define 

SC 

Oxla 

/* 

Data 

Symbol 

C 

* / 

♦define 

sD 

Oxlb 

/* 

Data 

Symbol 

D 

*/ 

♦define 

SE 

Oxlc 

/* 

Data 

Symbol 

E 

* / 

♦define 

SF 

Oxld 

/* 

Data 

Symbol 

F 

*/ 

♦define 

SQ 

0x00 

/* 

Line 

State  i 

Symbol  Q 

*/ 

♦define 

SI 

Oxlf 

/* 

Line 

State  , 

Symbol  I 

*/ 

♦define 

SH 

0x04 

/* 

Line 

State  , 

Symbol  H 

*/ 

♦define 

SJ 

0x18 

/* 

Starting  Delimiter  J 

♦define 

SK 

0x11 

/* 

Starting  Delimiter  K 

♦define 

ST 

0x15 

/* 

Ending  Delimiter  T * 

/ 

♦define 

SR 

OxOa 

/* 

Reset  Symbol  R 

*/ 

♦define 

SS 

OxOb 

/* 

Set  : 

Symbol 

S 

*/ 

♦define  S0S1S2S3S4S5S6S7  0xF269552DCF 

♦define  SISISQSISISISISISISISISISISISISI  OxFFClFFFFFFFFFFFFFFFF 

♦define  S0SQS2S3S4S5S6S7  0xF029552DCF 

♦define  S0SIS2S3S4S5S6S7  0xF7E9552DCF 

♦define  S0STS2S3S4S5S6S7  0xF569552DCF 

♦define  SQSH  0x004 

♦define  SJSK  0x311 

♦define  SJSQ  0x300 

♦define  SJSI  0x31f 

♦define  SISK  0x3fl 

♦define  SRSRSR  0x2 9 4a 


*/ 


*/ 

*/ 
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♦define 

♦define 

♦define 

SRSSSS  0x2 9 6b 
SRSQSR  0x2 80a 
SOSOSOSOSOSOSOSO 

0XF7BDEF7BDE 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

SSSSSR  0x2d6a 

SSSRSR  0x2d4a 

SQST  0x015 

STST  0x2b5 

SIST  0x3f5 

SOST  0x3d5 

SSSSSS  0x2d6b 

P 16  OxFFFFFFFFFFFFFFFFFFFF  /*  The  Preamble  field  in  frame 

typedef 

struct  { 

* transmitted  by  Tester. 

/*  General  MAC  Data  Frame  */ 

*/ 

long 

PA; 

/*  Preamble  */ 

long 

SD; 

/*  Starting  Delimiter  */ 

long 

FC; 

/*  Frame  Control  */ 

long 

DA; 

/*  Destination  Address  */ 

long 

SA; 

/*  Source  Address  */ 

long 

INFO; 

/*  INFOrmation  */ 

long 

FCS; 

/*  Frame  Check  Sequence  */ 

long 

ED; 

/*  End  Delimiter  */ 

long 

FS; 

/*  Frame  Status  */ 

char 

PA_tag, 

SD_tag,  FC_tag,  DA_tag,  SA_tag,  INF0_tag, 

FCS_ 

} 

extern 

pdu_DATA; 
Send  PDU 

DATA  ( ) ; 

ED_tag,  FS_tag; 


extern  int 
typedef  struct 


Is  PDU  DATAO; 


long 

PA; 

long 

SD; 

long 

FC; 

long 

ED; 

char 

PA_tag, 

} 

pdu_TOKEN 

extern 

Send  PDU 

/*  MAC  Nonrestricted  Token 
/*  Preamble  */ 

/*  Starting  Delimiter  */ 
/*  Frame  Control  */ 

/*  End  Delimiter  */ 
j,  FC_tag,  ED_tag; 


extern  int 


Is  PDU  TOKEN  0; 


typedef 

struct 

{ 

/*  The  MAC  frame  with  the  Invalid  Data  Length 

long 

PA; 

/*  Preamble  */ 

long 

SD; 

/*  Starting  Delimiter  */ 

long 

FC; 

/*  Frame  Control  */ 

long 

DA; 

/*  Destination  Address  */ 

long 

SA; 

/*  Source  Address  */ 

long 

INFO; 

/*  INFOrmation  field  with  the  Invalid  Data 

* Length.  */ 

long 

FCS; 

/*  Frame  Check  Sequence  */ 

long 

ED; 

/*  End  Delimiter  */ 

long 

FS; 

/*  Frame  Status  */ 

char 

PA_tag, 

SD_tag,  FC_tag,  DA_tag,  SA_tag,  INF0__tag,  FCS_tag,  ! 

} 

pdu_DATA_ 

InvLen; 

extern 

Send_PDD 

pATA_InvLen ( ) ; 

extern 

int 

Is_PDU_DATA_InvLen  0 ; 

typedef 

struct 

/*  The  MAC  frame  whose  symbol  times  is 

* greater  than  TVX  */ 

long 

PA; 

/*  Preamble  */ 

long 

SD; 

/*  Starting  Delimiter  */ 

long 

FC; 

/*  Frame  Control  */ 

long 

DA; 

/*  Destination  Address  */ 

long 

SA; 

/*  Source  Address  */ 

long 

INFO; 

/*  INFOrmation  field.  This  frame's  symbol 

* time  is  greater  than  TVX.  */ 

long 

FCS; 

/*  Frame  Check  Sequence  */ 

long 

ED; 

/*  End  Delimiter  */ 

long 

FS; 

/*  Frame  Status  */ 

char 

PA_tag, 

SD_tag,  FC_tag,  DA_tag,  SA_tag,  INF0_tag,  FCS_tag, 

*/ 


FS_tag; 


) pdu_DATA_OverMaxLen ; 

extern  Send_PDD_DATA_OvorMaxLen ( ) ; 

extern  int  Is_PDD_DATA_OverMaxLen () ; 
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typedef 

struct 

{ 

/* 

MAC  Claim  Frame  */ 

long 

PA; 

/* 

Preamble  */ 

long 

SD; 

/* 

Starting  Delimiter  */ 

long 

FC; 

/* 

Frame  Control  */ 

long 

DA; 

/* 

Destination  Address  */ 

long 

SA; 

/* 

Source  Address  */ 

long 

INFO; 

/* 

INFOrmation  */ 

long 

FCS; 

/* 

Frame  Check  Sequence  */ 

long 

ED; 

/* 

End  Delimiter  */ 

long 

FS; 

/* 

Frame  Status  */ 

char 

PA__tag,  SD_tag 

f,  FC_tag,  DA__tag,  SA_tag,  INFO_tag,  FCS_tag,  ED_tag,  FS_tag, 

} 

pdu_CLAIM; 

extern 

Send_PDU_CLAIM() 

; 

extern 

int 

Is_PDU_CLAIM()  ; 

typedef 

struct 

{ 

/* 

MAC  Beacon  Frame  */ 

long 

PA; 

/* 

Preamble  */ 

long 

SD; 

/* 

Starting  Delimiter  */ 

long 

FC; 

/* 

Frame  Control  */ 

long 

DA; 

/* 

Destination  Address  */ 

long 

SA; 

/* 

Source  Address  */ 

long 

INFO; 

/* 

INFOrmation  */ 

long 

FCS; 

/* 

Frame  Check  Sequence  */ 

long 

ED; 

/* 

End  Delimiter  */ 

long 

FS; 

/* 

Frame  Status  */ 

char 

PA_tag,  SD_tag 

r,  FC_tag,  DA__tag,  SA_tag,  INFO_tag,  FCS_tag,  ED_tag,  FS_tag 

} 

pdu_BEACON; 

extern 

Send__PDD_BEACON  ()  ; 

extern 

int 

Is_PDU_BEACON  ()  ; 

typedef 

struct 

{ 

/* 

SMT  ECHO  recjuest  Frame  */ 

long 

PA; 

/* 

Preamble  */ 

long 

SD; 

/* 

Starting  Delimiter  */ 

long 

FC; 

/* 

Frame  Control  */ 

BYTE 

DA [6] ; 

/* 

Destination  Address  */ 

BYTE 

SA[6]  ; 

/* 

Source  Address  */ 

long 

Fraine_Class ; 

/* 

To  identify  the  function  of  the  frame.  */ 

long 

Frame_Type; 

/* 

To  designate  the  type  of  the  frame  */ 

long 

Version_ID; 

/* 

The  value  will  not  change  when  upward 

★ 

compatible  changes  are  made  to  the  SMT 

★ 

frames.  */ 

long 

Transact ion_ID; 

/*  To  be  used  to  pair  SMT  responses 

* with  their  requests.  */ 

BYTE 

Station_ID [ 8] ; 

/* 

The  unique  identifier  for  an  FDDI  station 

* 

(or  concentrator) . */ 

long 

Pad; 

long 

InfoField_Length; 

/*  The  length  of  the  SMT  Information 

* field.  */ 

long 

P ar amet er_Type ; 

long 

Parameter_Length; 

/*  The  length  of  the  Echo_data.  */ 

BYTE 

Echo_data [1168] ; 

/*  SMT  InfoField  */ 

long 

FCS; 

/* 

Frame  Check  Sequence  */ 

long 

ED; 

/* 

Ending  Delimiter  */ 

long 

FS; 

/* 

Frame  Status  */ 

char 

PA_tag,  SD_tag,  FC_tag,  DA_tag,  SA_tag,  Frame__Clas3_tag,  Frame_Type_tag, 

} 

pdu_ECHO_Req; 

extern 

Send_PDD_ECHO_Req  0 

; 

extern 

int 

I s_PDD_ECHO_Req ( ) ; 

typedef 

struct 

{ 

/* 

SMT  ECHO  Response  Frame  */ 

long 

PA; 

/* 

Preamble  */ 

long 

SD; 

/* 

Starting  Delimiter  */ 

long 

FC; 

/* 

Frame  Control  */ 

BYTE 

DA[6] ; 

/* 

Destination  Address  */ 

BYTE 

SA[6] ; 

/* 

Source  Address  */ 

long 

Fraine_Class; 

/* 

To  identify  the  function  of  the  frame.  */ 

long 

Fraine_Type; 

/* 

To  designate  the  type  of  the  frame.  */ 

long 

Version_ID; 

/* 

The  value  will  not  change  when  upward 

♦ 

conpatible  changes  are  made  to  the  SMT 

long 

BYTE 

long 

long 


* frames.  */ 

Transaction_ID;  /*  To  be  used  to  pair  SMT  responses 

* with  their  requests.  */ 

Station_ID [ 8] ; /*  The  unique  identifier  for  an  FDDI  station 

* (or  concentrator) . */ 

Pad; 

Inf oField_Length;  /*  The  length  of  the  SMT  Information 

* field.  */ 


long  Parameter_Type; 

long  Parameter_Length;  /*  The  length  of  the  Echo_data.  */ 

BYTE  Echo_data [1168] ; /*  SMT  InfoField  */ 

long  FCS;  /*  Frame  Check  Sequence  */ 

long  ED;  /*  Ending  Delimiter  */ 

long  FS;  /*  Frame  Status  */ 

char  PA_tag,  SD_tag,  FC_tag,  DA_tag,  SA_tag,  Frame_Class_tag,  Frame_Type_tag,  Version_ID_ 

} pdu_ECHO_Resp; 

extern  Send_PDU_ECHO_Resp ( ) ; 

extern  int  Is_PDU_ECHO_Resp () ; 


typedef  struct 

{ 

/*  MAC  Data  Frame  Stripped 

long 

PA 

/*  Preamble  */ 

long 

SD 

/*  Starting  Delimiter  */ 

long 

FC 

/*  Frame  Control  */ 

long 

DA 

/*  Destination  Address  */ 

long 

SA 

/*  Source  Address  */ 

long 

INFO; 

/*  INFOrmation  */ 

long 

FCS; 

/*  Frame  Check  Secpjence  * 

long 

ED 

/*  Ending  Delimiter  */ 

long 

FS 

/*  Frame  Status  */ 

char 

PA_ 

_tag. 

SD_tag,  FC_tag,  DA_tag,  SA_tag, 

} 

pdu_DATA_ 

_Strip; 

extern 

Send_ 

_PDD_ 

_DATA_Strip  ()  ; 

FCS_tag,  ED_tag,  FS_tag; 


extern  int 
typedef  struct 


Is_PDU_DATA_Strip () ; 


/*  MAC  Nonrestricted  Token  Stripped  */ 


long 

PA; 

/*  Preamble  */ 

long 

SD; 

/*  Starting  Delimiter  */ 

long 

FC; 

/*  Frame  Control  */ 

long 

ED; 

/*  Ending  Delimiter  */ 

char 

PA_tag, 

SD_tag,  FC_tag,  ED_tag; 

} 

pdu_T0KEN 

_Strip; 

extern 

Send_PDU_ 

TOKEN_Strip()  ; 

extern  int 
typedef  struct 
long 
char 

) 


Is  PDU  TOKEN  Strip  0; 


Singleldle;  /’ 
Singleldle_tag; 
pdu_IDLE; 


A single  Idle  symbol  is  sent  by  Tester. 


extern  Send_PDD_IDLE  ()  ; 

extern  int  Is_PDD_IDLE  ()  ; 

extern  pdu_DATA  *DATA_T1{); 

extern  pdu_DATA  *DATA_R1(); 

extern  pdu_DATA  *DATA_T2(); 

extern  pdu_DATA  *DATA_R2(); 

extern  pdu_DATA  *DATA_T3(); 

extern  pdu_DATA  *DATA_T4 () ; 

extern  pdu_DATA  *DATA_T5(); 

extern  pdu_DATA  *DATA_T6(); 

extern  pdu_DATA  *DATA_T7_0 () ; 

extern  pdu_DATA  *DATA_T7_1 () ; 

extern  pdu_DATA  *DATA_T8(); 

extern  pdu_DATA  *DATA_T9(); 

extern  pdu_DATA  *DATA_T10 () ; 

extern  pdu_DATA  *DATA_T11_0  () ; 

extern  pdu_DATA  *DATA_R11_0 () ; 

extern  pdu_DATA  *DATA_T11_1 () ; 

extern  pdu_DATA  *DATA_R11_1  () ; 

extern  pdu_DATA_InvL€n  *DATA_InvLen_Tl () ; 

extern  pdu_DATA_OverMaxLen  *DATA_OverMaxLen  T1 () ; 
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extern  pdu__TOKEN  *T0KEN_T1  ()  ; 
extern  pdu_TOKEN  *T0KEN__R1  ()  ; 
extern  pdu_TOKEN  *T0KEN_T2 () ; 
extern  pdu_TOKEN  *T0KEN_T3(); 
extern  pdu__TOKEN  *T0KEN_T4(); 
extern  pdu_CLAIM  *CLAIM_T1(); 
extern  pdu__CLAIM  *CLAIM_R1  ()  ; 
extern  pdu__CLAIM  *CLAIM_T2(); 
extern  pdu__CLAIM  *CLAIM_R2(); 
extern  pdu__CLAIM  *CLAIM_T3(}; 
extern  pdu_CLAIM  *CLAIM_T4 () ; 
extern  pdu_CLAIM  *CLAIM_R4 () ; 
extern  pdu_BEACON  *BEAC0N__T1  ( ) ; 
extern  pdu__BEACON  *BEAC0N_R1  ( ) ; 
extern  pdu_BEACON  *BEAC0N_T2 ( ) ; 
extern  pdu_BEACON  *BEAC0N__R2  ( ) ; 
extern  p>du__ECHO_Req  *ECHO_Req__Tl  ()  ; 
extern  pdu__ECHO_Resp  *ECHO__Resp_Rl  ()  ; 
extern  pdu_ECHO_Resp  *ECHO__Resp_Tl  ( ) ; 
extern  pdu__DATA_Strip  *DATA_Strip__Rl  () ; 
extern  pdu_DATA__Strip  *DATA__Strip__R2  ()  ; 
extern  pdu__DATA_Strip  *DATA_Strip_R3  ( ) ; 
extern  pdu_DATA_Strip  *DATA_Strip_R4 ( ) ; 
extern  pdu_DATA__Strip  *DATA_Strip_R5  { ) ; 
extern  pdu__DATA__Strip  *DATA__Strip_R6  () ; 
extern  pdu_TOKEN_Strip  *TOKEN_Strip_Rl () 
extern  pdu__IDLE  *IDLE__I  ()  ; 


/*  NIST  TTCN  Translator  Version  1.0  4/89  */ 

♦include  "suite. h" 

/* 

* ***  Test  Suite:  FDDI  ****  Standard  Reference:  FDDI  MAC  (X3T9. 5/88-139) ; 

* PICS  Reference:  PIXIT  Reference:  How  Used: 

* Test  Methods:  The  Remote  Test  Method 

* Comments:  Test  Suite  for  FDDI  MAC  Conformance  Verification 


*/ 

long 

IUT_Address; 

/* 

The  address  of  Station  Under  Test.  */ 

long 

Teste  r_Addr  e s s ; 

/* 

The  address  of  Tester.  Get  this  value  from 

* 

Tester.  */ 

long 

TTRT; 

/* 

The  operative  Target  To)cen  Rotation  Time. 

long 

T_Req_T  ester; 

/* 

Tester's  Requested  TTRT.  */ 

long 

T_Req_IDT; 

/* 

IDT's  Requested  TTRT.  */ 

long 

T_Bid_Max; 

/* 

Highest  Bidding  Value  of  Tester  in  Claim 

* 

To}cen  Process.  */ 

long 

T_Bid_Min; 

/* 

Lowest  Bidding  Value  of  Tester  in  Claim 

* 

To)cen  process.  */ 

long 

M_FCS_Rev; 

long 

M_FCS_Tramt ; 

long 

a “ 0; 

/* 

A variable  for  the  test  suite.  */ 

pdu_DATA 

DATA,  *pDATA; 

pdu_T0KEN 

TOKEN,  *pT0KEN; 

pdu  DATA  InvLen 

DATA_InvLen,  *pDATA_InvLen; 

pdu  DATA_OverMaxLen  DATA_OverMaxLen,  *pDATA_OverMaxLen; 

pdu_CLAIM 

CLAIM,  *pCLAIM; 

*/ 


BEACON,  *pBEAC0N; 

ECH0_Req,  *pECH0_Req; 
ECH0_Resp,  *pECHO_Resp; 
DATA_Strip,  *pDATA_Strip; 
pdu_TOKEN_Strip  TOKEN_Strip,  *pTOKEN_Strip; 
pdu  IDLE  IDLE,  *pIDLE; 


pdu_BEACON 
pdu_ECHO_Re  q 
pdu_ECHO_Re  sp 
pdu_DATA_Strip 


/* 

* FrameTransmit  — Testing  MAC  Frame  Transmission 
*/ 
int 

FrameTransmit  () 

{ 

int  _lastlevel; 

_time  * 0; 

_level  * 1; 
strcpy(R,  "NONE") ; 

Result  «=  NONE; 

_timername  - (char  *)  0; 

_bufferlen  - -1; 

/•*  line  762  "FDDI.MP"  — [1]+  */ 

/*  Initializing  Connection  */ 

_lastlevel  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  ( 

_level  +-  1; 
while  (TRUE)  { 

/*  line  765  "FDDI.MP"  — [2]!  ECH0_Req  */ 

/*  Tester's  ECHO  Request  Frame (DA-IUT  Address).  */ 
pECHO_Req  - ECHO_Req_Tl () ; 

Send_PDU_ECHO_Req (pECHO_Req) ; 

_level  +-  1; 
while  (TRUE)  ( 

/*  line  769  "FDDI.MP"  — [3]!  TOKEN  */ 

/*  Tester  releases  To)cen  to  IDT.  */ 
pTOKEN  - T0KEN_T1(); 

Send_PDD_TOKEN (pTOKEN) ; 
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_level  +*  1; 

_tim€mame  ■ "TRT."; 
while  (TRUE)  { 

/*  line  773  "FDDI.MP"  — [4]?  ECHO_Resp  */ 

/*  IDT  sends  ECHO  Response  back.  */ 
pECHO_Resp  ■ ECHO_Reap_Rl () ; 

_buffer  - Receive_PDU (_timername) ; 
if  (Is_PDD_ECHO_Resp(pECHO_Resp,  _buffer) ) { 

_level  +-  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  777  "FDDI.MP"  — [5]?  TOKEN  */ 

/*  Tester  receives  Token  from  lUT.  */ 
pTOKEN  - T0KEN_R1  ()  ; 

_buffer  “ Receive_PDD (_timername) ; 
if  (Is_PDD_TOKEN(pTOKEN,  _buf fer) ) { 

_level  +“  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE)  ; 

} 

/*  line  783  "FDDI.MP"  — [5]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  786  "FDDI.MP"  --  [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1 ; 

SetfVerdict (FAIL)  ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [5]  */ 

} 

/*  line  789  "FDDI.MP"  — [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  792  "FDDI.MP"  --  [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 


} 

/* 

end 

of 

level 

[4] 

*/ 

} 

/* 

end 

of 

level 

[3] 

*/ 

} 

} 

_level  * _lastlevel; 

/* 

end 

of 

level 

[2] 

*/ 

return  (FALSE) ; 

/* 

end 

of 

level 

[1] 

*/ 

/* 

* FrameRepeat  — Testing  MAC  Frame  Repeating 
*/ 
int 

FrameRepeat  () 

{ 

int  _last level; 

_time  - 0 ; 

_level  “1; 
strcpy(R,  "NONE"); 

Result  - NONE; 
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_timernaine  - (char  *)  0; 

_bufferlan  -1; 

/*  line  801  "FDDI.MP"  — [1]+  */ 

/*  Initializing  Connection  */ 

_lastlevel  -•  _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +-  1; 
while  (TRUE)  { 

/*  line  804  "FDDI.MP"  — [2]!  DATA  */ 

/*  Sending  Tester  Frame  (DAO  I UT  Address).  */ 
pDATA  - DATA_T1(); 

Send_PDU_DATA (pDATA) ; 

_level  +-  1; 

_timemame  « "TRT."; 
while  (TRUE)  { 

/*  line  808  "FDDI.MP"  — [3]?  DATA  */ 

/*  Tester  gets  the  Tester  frame  repeated  (A*R;  C-R;  E-R) . 
pDATA  - DATA_R1 ( ) ; 

_buffer  “ Receive_PDU  (__timername)  ; 
if  (Is_PDU_DATA (pDATA,  _buf fer) ) { 

_level  +“  I; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  814  "FDDI.MP"  — [3]?  OTHERWISE  */ 
if  (_buffer)  ( 

_level  +«  1; 

SetfVerdict (FAIL) ; 
return  (TRUE)  ; 

} 

/*  line  817  "FDDI.MP"  — [3]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +=  1; 

SetfVerdict (INCONC) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [3]  */ 

} /*  end  of  level  [2]  */ 

} 

_level  - _lastlevel; 
return  (FALSE) ; 

) /*  end  of  level  [1]  */ 


/* 

* FrameReceive  — Testing  MAC  Frame  Receiving 
*/ 
int 

FrameReceive () 

{ 

int  _lastlevel; 

_time  “ 0; 

_level  « 1; 
strcpy(R,  "NONE"); 

Result  - NONE; 

_timername  - (char  *)  0; 

_bufferlen  -1; 

/*  line  825  "FDDI.MP"  — [1]+  */ 

/*  Initializing  Connection  */ 

_lastlevel  - level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_lovel  > _lastlevel)  ( 

_level  +-  1;  127 


while  (TRUE),  { 

/*  line  828  "FDDI.MP"  — [2]!  DATA  */ 

/*  Tester  sends  the  f rame (DA-IUT  Address).  */ 
pDATA  - DATA_T2  ()  ; 

Send_PDU_DATA  (pDATA)  ; 

_level  +-  1/ 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  832  "FDDI.MP"  — [3]?  DATA  */ 

/*  Tester  gets  the  frame  (A-S;  C-S;  E-R)  received  by  lUT. 
pDATA  - DATA_R2  ()  ; 

_buffer  - Receive_PDU (_timername)  ; 
if  (Is_PDD_DATA(pDATA,  _buf  fer)  ) { 

_level  +-  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  838  "FDDI.MP"  — [3]?  OTHERWISE  */ 
if  (__buffer)  { 

_level  +-  1; 

SetfVerdict (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  841  "FDDI.MP"  — [3]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [3]  */ 

} /*  end  of  level  [2]  */ 

} 

_level  = __lastlevel; 
return  (FALSE); 

} /*  end  of  level  [1]  */ 


/* 

* FrameStrip  — Testing  MAC  Frame  Stripping 
*/ 
int 

FrameStrip  () 

{ 

int  _la St level; 

_time  * 0; 

_level  •=  1; 
strcpy(R,  "NONE") ; 

Result  - NONE; 

_timername  - (char  *)  0; 

_bufferlen  - -1; 

/*  line  849  "FDDI.MP"  — [1]+  */ 

/*  Initializing  Connection.  */ 

_last level  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +“  1; 
while  (TRUE)  { 

/*  line  852  "FDDI.MP"  — [2]!  ECHO_Req  */ 

/*  Tester  sends  SMT  ECHO  Request  frame,  */ 
pECHO_Req  - ECHO_Req_Tl () ; 

Send_PDD__ECHO_Req  (pECHO_Req)  ; 

_level  +-  1; 
while  (TRUE)  { 

/*  line  856  "FDDI.MP"  --  [3]!  TOKEN  */ 

/*  2md  then  issues  To)cen.  */ 


*/ 
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pTOKEN  - TOKEN_Tl(); 

Send_PDa_TOKEN (pTOKEN) ; 

_level  +-  1; 

_timemame  * ''TRT."; 
while  (TRUE)  { 

/*  line  860  "FDDI.MP"  — (4)?  ECHO_Resp  */ 

/*  IDT  sends  SMT  ECHO  Response  frame,  */ 
pECHO_Resp  - ECHO_Resp_Rl () ; 

_buffer  - Receive_PDD  (_timemame)  ; 
if  (Is_PDU_ECHO_Resp(pECHO__Resp,  _buf fer)  ) { 

_level  +-  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  864  "FDDI.MP"  — [5]?  TOKEN  */ 

/*  and  issues  To)cen  to  Tester.  */ 
pTOKEN  - T0KEN__R1  ()  ; 

_buffer  - Receive_PDU (_timername) ; 
if  (I s_PDU_TOKEN (pTOKEN,  _buf fer) ) { 

Start_timer ("TRT. ",  (long)  TTRT  1000); 

_level  +-  1; 
while  (TRUE)  { 

/*  line  868  "FDDI.MP"  — (6]!  ECH0_Re8p  */ 

/* 

* Tester  received  ECHO  Response  and  returns  this  frame  to 

* IDT. 

*/ 

pECHO_Resp  - ECHO_Resp_Tl () ; 

Send__PDD_ECHO_Resp  (pECHO_Resp)  ; 

_level  +=  1; 

_timername  » "TRT."; 
while  (TRUE)  { 

/*  line  872  "FDDI.MP"  — [7]?  DATA_Strip  */ 

/*  IDT  strips  this  frame.  */ 
pDATA_Strip  = DATA_Strip_R6 () ; 

_buf fer  - Receive_PDD  (_timemame)  ; 
if  (Is_PDU_DATA_Strip (pDATA_Strip,  _buffer) ) { 

_level  +«  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  878  "FDDI.MP"  — [7]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRDE) ; 

} 

/*  line  881  "FDDI.MP"  — [7]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [7]  */ 

) /*  end  of  level  [6]  */ 

} 

/*  line  884  "FDDI.MP"  — [5]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +■  1; 

SetfVerdict (INCONC) ; 
return  (TRUE) ; 

} 

/*  line  887  "FDDI.MP"  — [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict (INCONC)  ; 
return  (TRDE) ; 
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} 

} /*  end  of  level  [5]  */ 

} 

/*  line  890  "FDDI.MP"  --  [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +“  1 ; 

SetfVerdict (INCONC) ; 
return  (TRUE) ; 

} 

/*  line  893  "FDDI.MP"  — [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) ( 

_level  +«  1; 

SetfVerdict (INCONC) ; 
return  (TRUE) ; 


} 

/* 

end 

of 

level 

[4] 

*/ 

} 

/* 

end 

of 

level 

[3] 

*/ 

} 

} 

_level  - _lastlevel; 

/* 

end 

of 

level 

[2] 

*/ 

return  (FALSE) ; 

/* 

end 

of 

level 

[1] 

*/ 

/* 

* TesterWinClaim  — Testing  MAC  Claim  Tolcen  Process  1;  Tester  wins  Claim 

* Token 
*/ 

int 

TesterWinClaim ( ) 

{ 

int  _lastlevel; 

_time  =0; 

_level  * 1; 
strcpy(R,  "NONE") ; 

Result  * NONE; 

_timername  - (char  *)  0; 

_bufferlen  - -1; 

/*  line  902  "FDDI.MP"  — [1]+  */ 

/*  Initializing  Connection  */ 

_last level  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +-  1; 

A; 

while  (TRUE)  { 

/*  line  907  "FDDI.MP"  — [2]?  TIMEOUT  */ 

/*  Tester  holds  Token  and  sends  Idle  symbols  until  TVX  expires.  */ 
if  (Timeout ("TVX. ") ) { 

_level  1 ; 
return  (FALSE) ; 

} 

/*  line  909  "FDDI.MP"  --  [2]!  IDLE  */ 
pIDLE  - IDLE_I(); 

Send_PDU_IDLE (pIDLE) ; 

_level  +«  1 ; 
while  (TRUE)  { 

/*  line  912  "FDDI.MP"  — [3]  */ 

if  ((a  — 0))  { 

_level  +“  1; 

/*  line  914  "FDDI.MP"  — [4]?  GOTO  */ 
goto  A; 

} 

/*  line  916  "FDDI.MP"  — [3]  */ 

Start_timer ("TRT.TRTclaim",  (long)  T_Max  1000); 
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_level  +“  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/■*  line  918  "FDDI.MP"  — [4]?  CLAIM  */ 

/*  lUT  issues  Claim  frame.  */ 
pCLAIM  - CLAIM_R1  ()  ; 

_buffer  - Receive_PDU (_timername) ; 
if  (Is_PDU_CLAIM(pCLAIM,  _buffer) ) { 

Start_timer ("TRT.TRTclaim",  (long)  T_Max  1000); 

_level  +-  1; 
while  (TRUE)  { 

/*  line  922  "FDDI.MP"  --  [5]!  CLAIM  */ 

/*  Tester  issues  its  Claim  frame  with  highest  T_Bid. 
pCLAIM  - CLAIM_T2  ()  ; 

Send_PDU_CLAIM (pCLAIM) ; 

_level  +-  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  926  "FDDI.MP"  — [6]?  CLAIM  */ 

/*  lUT  repeats  Tester  Claim  Frame.  */ 
pCLAIM  - CLAIM_R2(); 

_buffer  ■“  Receive_PDU  (_timername)  ; 
if  (Is_PDU_CLAIM (pCLAIM,  _buf fer) ) { 

Start_timer ("TRT. ",  (long)  TTRT  1000); 

_level  +“  1; 
while  (TRUE)  { 

/*  line  930  "FDDI.MP"  — [7]!  TOKEN  */ 

/*  Tester  issues  To)cen.  */ 
pTOKEN  - T0KEN_T1  ()  ; 

Send_PDU_TOKEN (pTOKEN) ; 

_level  +-  1 ; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  934  "FDDI.MP"  — [8]?  TOKEN  */ 

/*  IDT  repeats  To)cen.  */ 
pTOKEN  - T0KEN_R1 ( ) ; 

_buffer  - Receive_PDU (_timername) ; 
if  (I s_PDD_TOKEN (pTOKEN,  _buf f er) ) { 

_level  +-  1 ; 

Set fVer diet  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  940  "FDDI.MP"  — [8]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +“  1; 

SetfVerdict (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  943  "FDDI.MP"  — [8]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

) 

} /*  end  of  level  [8]  */ 

} /*  end  of  level  [7]  */ 

) 

/*  line  946  "FDDI.MP"  — 16]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  949  "FDDI.MP"  — [6]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 


*/ 
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SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [6]  */ 

} /*  end  of  level  [5]  */ 

} 

/*  line  952  "FDDI.MP"  — [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  955  "FDDI.MP"  — [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

■ _level  +=  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 


} 

/* 

end 

of 

level 

[4] 

*/ 

} 

/* 

end 

of 

level 

[3] 

*/ 

} 

/* 

end 

of 

level 

[2] 

*/ 

} 

_level  » _lastlevel; 
return  (FALSE) ; 

) /*  end  of  level  [1]  */ 


/* 

* lUTWinClaim  — Testing  MAC  Claim  Token  process  2:  lUT  wins  Claim  Token 
*/ 
int 

lUTWinClaimO 

{ 

int  _lastlevel; 

_time  = 0; 

_level  = 1; 
strcpy(R,  "NONE"); 

Result  = NONE; 

_timername  - (char  *)  0; 

_bufferlen  - -1; 

/*  line  963  "FDDI.MP"  — [1]+  */ 

_lastlevel  -■  _level; 
if  (INITCONNECT  0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +-  1; 

B; 


while  (TRUE)  { 

/*  line  966  "FDDI.MP"  --  [2]?  TIMEOUT  */ 
if  (Timeout ("TVX. ") ) { 

_level  +*  1; 
return  (FALSE) ; 


} 

/*  line  968  "FDDI.MP"  — [2]!  IDLE  */ 

/*  Tester  holds  Token  and  sends  Idle  symbols  xintil  TVX  expires. 
pIDLE  - IDLE_I(); 

Send_PDD_IDLE (pIDLE) ; 

_level  +-  1; 
while  (TRUE)  { 

/*  line  972  "FDDI.MP"  — [3]  */ 


if  ((a  — 0))  { 

_level  +*  1; 

/*  line  974  "FDDI.MP"  — 
goto  B; 

) 

/*  line  976  "FDDI.MP"  — 


[4]?  GOTO  */ 


*/ 


[3]  */ 
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Start_timer ("TRT.TRTclaim",  (long)  T_Max  1000); 

_level  +-  1; 

_tiinername  - ''TRT."; 
while  (TRUE)  { 

/*  line  978  "FDDI.MP"  — [4]?  CLAIM  */ 

/*  IDT  issues  Claim  frame.  */ 
pCLAIM  - CLAIM_R1  ()  ; 

_buffer  - Receive_PDU (_timername) ; 
if  (Is_PDD_CLAIM(pCLAIM,  _buffer) ) { 

Start_timer ("TRT.TRTclaim",  (long)  T_Max  1000); 

_level  +“  1; 
while  (TRUE)  { 

/*  line  902  "FDDI.MP"  — [5]!  CLAIM  */ 

/*  Tester  issues  its  Claim  frame  with  lowest  T_Bid.  */ 
pCLAIM  - CLAIM_T3(); 

Sendi_PDU_CLAIM(pCLAIM)  ; 

_level  +-  1; 

_timername  » "TRT."; 
while  (TRUE)  { 

/*  line  986  "FDDI.MP"  — [6]?  CLAIM  */ 

/*  IDT  issues  its  Claim  frame  again.  */ 
pCLAIM  - CLAIM_R1  ()  ; 

_buff  er  -•  Receive_PDU  (_timemame)  ; 
if  ( I s_PDU_CLAIM (pCLAIM,  _buff er) ) { 

_level  +•=  1; 
while  (TRUE)  { 

/*  line  990  "FDDI.MP"  — [7]!  CLAIM  */ 

/*  Tester  repeats  IDT's  Claim  frame.  */ 
pCLAIM  - CLAIM_T1  ()  ; 

Send_PDU_CLAIM (pCLAIM) ; 

Start_timer ("TRT. ",  (long)  TTRT  1000); 

_level  +=  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  994  "FDDI.MP"  — [8]?  TOKEN  */ 

/*  IDT  issues  To)cen.  */ 
pTOKEN  - T0KEN_R1(); 

_buffer  “ Receive_PDU  (_timemame)  ; 
if  (Is_PDU_TOKEN(pTOKEN,  _buf fer) ) { 

_level  +-  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  1000  "FDDI.MP"  --  [8]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1003  "FDDI.MP"  — [8]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [8]  */ 

} /*  end  of  level  [7]  */ 

) 

/*  line  1006  "FDDI.MP"  --  [6]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

) 

/*  line  1009  "FDDI.MP"  — [6]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 
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_level  +*  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [6]  */ 

} /*  end  of  level  [5]  */ 

} 

/*  line  1012  "FDDI.htt>"  --  [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1 ; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1015  "FDDI.NEP"  — [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict  (FAIL)  / 
return  (TRUE) ; 


) 

/* 

end 

of 

level 

[4] 

*/ 

} 

/* 

end 

of 

level 

[3] 

*/ 

} 

/* 

end 

of 

level 

[2] 

*/ 

} 

_level  “ _lastlevel; 
return  (FALSE) ; 

} /*  end  of  level  [1]  */ 


/* 

* TesterGotOwnBeacon  — Testing  MAC  Beacon  process  1:  Tester  receives  its 

* own  Beacon 

* / 
int 

TesterGotOwnBeacon () 

{ 

int  _last level; 

_time  “0; 

_level  “1; 
strcpy(R,  "NONE"); 

Result  “ NONE; 

_timemame  ■ (char  *)  0; 

_bufferlen  ■ -1; 

/*  line  1024  "FDDI.MP"  — [1]+  */ 

/*  Initializing  Connection  */ 

_last level  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +“  1; 

C: 

while  (TRUE)  { 

/*  line  1029  "FDDI.MP"  ~ [2]?  TIMEOUT  */ 

/*  Tester  holds  Tolcen  and  sends  Idle  symbols  until  TVX  expires.  */ 
if  (Timeout ("TVX.") ) { 

_level  +■  1; 
return  (FALSE) ; 

} 

/*  line  1031  "FDDI.MP"  --  [2]!  IDLE  */ 
pIDLE  - IDLE_I(); 

Send_PDD_IDLE  (pIDLE)  ; 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1034  "FDDI.MP"  — [3]  */ 

if  ((a  — 0))  { 

_level  +-  1; 

/*  line  1036  "FDDI.MP"  — [4]?  GOTO  */ 
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goto  C; 


) 

/*  line  1038  "FDDI.MP"  — [3]  */ 

Start_timer  (*'TRT. TRTclaim" , (long)  T_Max  1000); 

_level  +-  1; 

_timemame  -=  "TRT."; 
while  (TRUE)  { 

/*  line  1040  "FDDI.MP"  — [4]?  CLAIM  */ 

/*  lUT  issues  Claim  frame.  */ 
pCLAIM  -=  CLAIM_R1(); 

_buffer  ••  Receive_PDU  (_timername)  ; 
if  (Is_PDU_CLAIM(pCLAIM,  _buf fer) ) ( 

_level  +“  1; 
while  (TRUE)  { 

/*  line  1045  "FDDI.MP"  — [5]?  TIMEOUT  */ 

/* 

* Tester  holds  lUT's  Claim  frame  to  cause  that  the  Claim  To)cen 

* process  fails. 

*/ 

if  (Timeout ("TRT. ")  ) { 

_level  +“  1; 
while  (TRUE)  { 

/*  line  1047  "FDDI.MP"  — [6]  */ 

Start_timer ("TRT.TRTbeacon",  (long)  T_Max  1000); 

_level  +-  1; 

_timername  **  "TRT."; 
while  (TRUE)  { 

/*  line  1049  "FDDI.hff>"  — [7]?  BEACON  */ 

/*  lUT  issues  Beacon  frame.  */ 
pBEACON  = BEAC0N_R1 ( ) ; 

_buff  er  - Receive_PDU  (_timemame)  ; 
if  ( I s_PDU_BEACON (pBEACON,  _buf fer) ) { 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1053  "FDDI.MP"  — [8]!  BEACON  */ 

/* 

* Tester  holds  lUT's  Beacon  frame  and  issues  its  own 

* Beacon  frame. 

*/ 

pBEACON  - BEAC0N_T2 () ; 

Send_PDU_BEACON (pBEACON)  ; 

_level  +-  1; 

_timername  * "TRT."; 
while  (TRUE)  ( 

/*  line  1057  "FDDI.MP"  --  [9]?  BEACON  */ 

/*  IDT  repeats  Tester's  Beacon  frame.  */ 
pBEACON  - BEACON_R2 ( ) ; 

_buffer  - Receive_PDD  (_timemame)  ; 
if  ( I s_PDU_BEACON (pBEACON,  _buf fer) ) { 

Start_timer ("TRT. TRTclaim",  (long)  T_Max  1000) ; 
_level  +-  1; 
while  (TRUE)  { 

/*  line  1061  "FDDI.MP"  --  [10]!  CLAIM  */ 

/* 

* After  Tester  receives  its  own  Beacon  frame, 

* it  sends  Claim  frame. 

*/ 

pCLAIM  - CLAIM_T4(); 

Send_PDU_CLAIM(pCLAIM)  ; 

_level  +-  1; 

_timername  - "TRT."; 
while  (TRUE)  ( 

/*  line  1065  "FDDI.MP"  — [11]?  CLAIM  */ 

/*  IDT  rep>eats  Tester's  Claim  frame.  */ 
pCLAIM  - CLAIM_R4  ()  ; 

_buff  er  “ Receive_PDD  ( timemame)  ; 
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if  (Is_PDU_CLAIM(pCLAIM,  _buf fer) ) { 

Start_timer ("TRT. ",  (long)  TTRT  1000); 

_level  +«■  1; 
while  (TRUE)  { 

/*  line  1069  "FDDI.MP"  — [12]!  TOKEN  */ 

/* 

* Tester  issues  To)cen  after  it  receives 

* its  own  Claim  frame. 

*/ 

pTOKEN  - T0KEN_T1  ()  ; 

Send_PDU_TOKEN (pTOKEN) ; 

_level  +-  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1073  "FDDI.MP"  — [13]?  TOKEN-*/ 

/*  lUT  repeats  To)cen.  */ 
pTOKEN  - TOKEN_Rl ( ) ; 

_buff er  « Receive_PDU  (_tiinemame)  ; 
if  (I s_PDD_TOKEN (pTOKEN,  _buf fer) ) { 

_level  +-  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/* 

* line  1079  "FDDI.MP"  — [13]? 

* OTHERWISE 

*/ 

if  (_buffer)  { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1082  "FDDI.MP"  --  [13]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +“  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [13]  */ 

} /*  end  of  level  [12]  */ 

} 

/*  line  1085  "FDDI.MP"  --  [11]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1088  "FDDI.MP"  --  [11]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +*  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [11]  */ 

} /*  end  of  level  [10]  */ 

} 

/*  line  1091  "FDDI.MP"  — [9]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1094  "FDDI.MP"  --  [9]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

__level  +*  1; 

SetfVerdict  (FAIL)  ; 


return  (TRUE) ; 


} 


} 

} /*  end  of  level  [9]  */ 

} /*  end  of  level  [8]  */ 

* } 

/*  line  1097  "FDDI.MP"  — [7]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1100  "FDDI.MP"  — [7]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +“  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [7]  */ 

} /*  end  of  level  [6]  */ 

} 

} /*  end  of  level  [5]  */ 

} 

/*  line  1103  "FDDI.MP"  — [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict (INCONC) ; 
return  (TRUE) ; 


} 

/*  line  1106  "FDDI.MP"  — [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-=  1; 

SetfVerdict (INCONC) ; 
return  (TRUE) ; 


} 

} 

} 

} 

} 

_level  *•  _lastlevel; 
return  (FALSE) ; 


/*  end  of  level  [4]  */ 
/*  end  of  level  [3]  */ 
/*  end  of  level  [2]  */ 


/*  end  of  level  [1]  */ 


/* 

* lUTGotOwnBeacon  — Testing  MAC  Beacon  process  2: 

* Beacon 
*/ 

int 


lUTGotOwnBeacon  () 

( 

int  _lastlevel; 

_time  ■■  0; 

_level  “1; 
strcpy(R,  "NONE") ; 

Result  “ NONE; 

_timername  - (char  *)  0; 

_bufferlen  -1; 

/*  line  1114  "FDDI.MP"  — [1]+  */ 

I*  Initializing  Connection  */ 
_last level  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 
_level  +-  1; 

D; 


lUT  receives  its  own 


while  (TRUE)  ( 
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/*  line  1119  "FDDI.MP"  --  [2]?  TIMEOUT  */ 

/*  Tester  holds  Token  and  sends  Idle  symbols  until  TVX  expires.  */ 
if  (Timeout ("TVX. ") ) { 

_level  +-  1; 
return  (FALSE) ; 

} 

/*  line  1121  "FDDI.MP"  — [2] ! IDLE  */ 
pIDLE  - IDLE__I(); 

Send_PDU_IDLE  (pIDLE)  ; 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1124  "FDDI.I^"  — [3]  */ 

if  ((a  — 0))  { 

_level  +”  1; 

/*  line  1126  "FDDI.MP"  — [4]?  GOTO  */ 
goto  D; 

} 

/*  line  1128  "FDDI.MP"  — [3]  */ 

Start_timer ("TRT.TRTclaim",  (long)  T_Max  1000); 

_level  +=  1; 

_timername  •=  "TRT."; 
while  (TRUE)  { 

/*  line  1130  "FDDI.MP"  — [4]?  CLAIM  */ 

/*  IDT  issues  Claim  frame.  */ 
pCLAIM  = CLAIM_R1  ()  ; 

_buf  fer  *=  Receive_PDU  (_timername)  ; 
if  (Is_PDU_CLAIM(pCLAIM,  _buf fer) ) { 

_level  +•=  1; 
while  (TRUE)  { 

/*  line  1135  "FDDI.MP"  — [5]?  TIMEOUT  */ 

/* 

* Tester  holds  lUT's  Claim  frame  to  cause  that  the  Claim  frame 

* fails. 

*/ 

if  (Timeout ("TRT. ") ) { 

_level  +“  1; 
while  (TRUE)  { 

/*  line  1137  "FDDI.MP"  --  [6]  */ 

Start_timer ("TRT.TRTbeacon",  (long)  T_Max  1000) ; 

_level  +*  1; 

_timemame  - "TRT."; 
while  (TRUE)  { 

/*  line  1139  "FDDI.MP"  --  [7]?  BEACON  */ 

/*  lUT  issues  Beacon  frame.  */ 
pBEACON  - BEAC0N_R1(); 

_buff er  - Receive_PDD (_timername) ; 
if  ( I s_PDD_BEACON (pBEACON,  _buf fer) ) { 

_level  +»  1; 
while  (TRUE)  { 

/*  line  1143  "FDDI.MP"  — [8]!  BEACON  */ 

/*  Tester  repeats  lUT's  Beacon  frame.  */ 
pBEACON  - BEAC0N_T1(); 

Send_PDU_BEACON (pBEACON) ; 

Start_timer ("TRT.TRTclaim",  (long)  T_Max  1000); 

_level  +-  1; 

_timername  ” "TRT."; 
while  (TRUE)  { 

/*  line  1147  "FDDI.MP"  --  [9]?  CLAIM  */ 

/* 

* After  IDT  receives  its  own  Beacon  frame,  it 

* issues  Claim  frame. 

*/ 

pCLAIM  - CLAIM_R1  ()  ; 

_buffer  - Receiv€_PDU  (__timemame)  ; 
if  (I s_PDD_CLAIM (pCLAIM,  _buf fer) ) { 

_level  +-  1; 


138 


while  (TRUE)  ( 

/*  line  1151  "FDDI.MP”  --  [10] I CLAIM  */ 

/*  Tester  repeats  lUT's  Beacon  frame.  */ 
pCLAIM  - CLAIM_T1  ()  ; 

Send_PDU_CLAIM (pCLAIM) ; 

Start_timer ("TRT. ",  (long)  TTRT  1000); 

_level  +“  1; 

_timemame  - "TRT."; 
while  (TRUE)  { 

/*  line  1155  "FDDI.MP"  — [11]?  TOKEN  */ 

/* 

* After  lUT  wins  Claim  To)cen  process,  it 

* issues  To)cen. 

*/ 

pTOKEN  - T0KEN_R1(); 

_buffer  “ Receive_PDD  (_timemame)  ; 
if  (Is_PDU_TOKEN(pTOKEN,  _buf fer) ) { 

_level  +-•  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  1161  "FDDI.MP"  — [11]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1164  "FDDI.MP"  --  [11]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [11]  */ 

} /*  end  of  level  [10]  */ 

} 

/*  line  1167  "FDDI.MP"  — [9]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1170  "FDDI.MP"  --  [9]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [9]  */ 

} /*  end  of  level  [8]  */ 

} 

/*  line  1173  "FDDI.MP"  — [7]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

) 

/*  line  1176  "FDDI.MP"  — [7]?  TIMEOUT  */ 
if  (Timeout ("TRT. ")  ) { 

_level  1; 

SetfVerdict (FAIL)  ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [7]  */ 

} /*  end  of  level  [6]  */ 


1 
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} 


/*  end  of  level  [5]  */ 


) 


} 

/*  line  1179  "FDDI.MP"  •—  [4]?  OTHERWISE  */ 
if  (_buffer)  { 

__level  +»  1; 

SetfVerdict (INCONC) ; 
return  (TRUE) ; 


} 

/*  line  1182  "FDDI.MP"  — [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +>=  1; 

SetfVerdict (INCONC) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [4]  */ 

} /*  end  of  level  [3]  */ 

} /*  end  of  level  [2]  */ 

} 


_level  -=  __lastlevel; 
return  (FALSE); 

/*  end  of  level  [1]  */ 


/* 

* EarlyTo)cen  --  Testing  MAC  Timed  Token  Rotation  protocol  (TTRP)  1:  Tester 

* receives  Early  Token 
*/ 

int 

EarlyToken  () 

{ 

int  _lastlevel; 

__time  - 0; 

_level  “ 1; 
strcpy(R,  "NONE") ; 

Result  * NONE; 

_timemame  ■«  (char  *)  0; 

__bufferlen  * -1; 

/*  line  1191  "FDDI.MP"  — [1]+  */ 

__last level  « _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > __lastlevel)  { 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1193  "FDDI.l^"  — [2]!  ECH0__Req  */ 

/*  Tester  sends  SMT  ECHO  Request  frame.  */ 
pECH0__Req  - ECHO__Req_Tl  ()  ; 

Send_PDU_ECHO_Req (pECH0_Req) ; 

_level  +•  1; 
while  (TRUE)  { 

/*  line  1197  "FDDI.MP"  — [3]!  TOKEN  */ 

/*  Tester  issues  Token.  */ 
pTOKEN  - T0KEN__T1(); 

Send_PDD__TOKEN  (pTOKEN)  ; 

_level  +“  1; 

__timername  « "TRT . " ; 
while  (TRUE)  { 

/*  line  1201  "FDDI.MP"  — [4]?  ECH0__Resp  */ 

/*  IDT  returns  ECHO  Response  frame.  */ 
pECHO_Resp  - ECHO_Resp_Rl () ; 

__buffer  Receive_PDD  (__timemcune)  ; 
if  (Is__PDD_ECHO__Resp(pECHO_Resp,  _buf fer)  ) { 

_level  +-  1; 

_tiinemame  - "TRT."; 
while  (TRUE)  { 

/*  line  1205  "FDDI.MP"  — [5]?  TOKEN  */ 


^ /.  n 


} 


/*  lUT  returns  Token  (TRT<TTRT) . */ 

pTOKEN  - T0KEN_R1  ()  ; 

_buffer  “ Receive_PDU (_timername) ; 
if  (Is_PDO_TOKEN (pTOKEN,  _buf fer) ) { 

_level  +-  1; 

SetfVerdict (PASS) ; 
return  (TRUE) ; 

) 

/*  line  1211  "FDDI.MP"  — [5]?  OTHERWISE  */ 
if  (_buffer)  ( 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 


} 

/*  line  1214  "FDDI.MP"  — [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [5]  */ 

) 

/*  line  1217  "FDDI.MP"  — [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict (FAIL)  ; 
return  (TRUE) ; 


} 

/*  line  1220  "FDDI.MP 
if  (Timeout ("TRT. ") ) 
_level  +-  1; 
SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

} 

} 

} 

} 

_level  - _lastlevel; 
return  (FALSE); 


— [4]?  TIMEOUT  */ 


/*  end  of  level  [4]  */ 
/*  end  of  level  [3]  */ 
/*  end  of  level  [2]  */ 


/*  end  of  level  [1]  */ 


/* 

* LateToken  — Testing  MAC  Timed  Token  Rotation  Protocol (TTRP)  2:  Tester 

* receives  Late  Token 
*/ 

int 

LateToken  () 

{ 

int  _lastlevel; 

_time  - 0; 

_level  “ 1; 
strcpy(R,  "NONE") ; 

Result  - NONE; 

_timername  - (char  *)  0; 

_bufferlen  - -1; 

/*  line  1228  "FDDI.MP"  — [1]+  */ 

/*  Initializing  Connection  */ 

_lastlevel  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  ( 

_level  +“  1; 
while  (TRUE)  { 

I*  line  1231  "FDDI.MP"  --  [2]!  ECH0_Req  */ 
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/*  Tester  sends  SMT  ECHO  Request  frame,  */ 
pECHO_Req  - ECHO_Req_Tl () ; 

Send_PDD_ECHO_Req (pECHO_Req) ; 

_level  +•■  1; 
while  (TRUE)  { 

/*  line  1235  "FDDI.MP"  — [3]?  TIMEOUT  */ 
if  (Timeout ("TRT. ”)  ) { 

__level  +-  1; 
while  (TRUE)  { 

/*  line  1237  ’’FDDI.MP"  — [4]  */ 

Start_timer ("TRT. ",  (long)  TTRT  1000); 

_level  +=  1; 
while  (TRUE)  { 

/*  line  1239  "FDDI.MP"  — [5]!  TOKEN  */ 

/*  and  issues  Late  To)cen  when  TTRT<TRT<2xTTRT . */ 

pTOKEN  - TOKEN_Tl(); 

Send_PDU_TOKEN (pTOKEN) ; 

_level  +*  1; 

_timername  * "TRT."; 
while  (TRUE)  { 

/*  line  1243  "FDDI.MP"  — [6]?  TOKEN  */ 

/*  IDT  returns  Token.  */ 
pTOKEN  -=  TOKEN_Rl  ()  ; 

_buf f er  “ Receive_PDD (_timername) ; 
if  (I s_PDD_TOKEN (pTOKEN,  _buf fer) ) { 

Start_timer ("TRT. ",  (long)  TTRT  1000); 

_level  1; 
while  (TRUE)  { 

/*  line  1247  "FDDI.MP"  — [7]!  ECH0_Req  */ 

/*  Tester  sends  SMT  ECHO  Request  frame  again,  */ 
pECHO_Req  - ECHO_Req_Tl () ; 

Send_PDU_ECHO_Req (pECH0_Req) ; 

_level  +”  1; 
while  (TRUE)  { 

/*  line  1251  "FDDI.MP"  --  [8]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +“  1; 
while  (TRUE)  { 

/*  line  1253  "FDDI.MP"  — [9]  */ 

Start_timer ("TRT. ",  (long)  TTRT  1000); 

_level  +■»  1; 
while  (TRUE)  { 

/*  line  1255  "FDDI.MP"  — [10]!  TOKEN  */ 

/* 

* and  issues  Late  Token  again  when 

* TTRT<TRT<2xTTRT . 

*/ 

pTOKEN  - T0KEN_T1(); 

Send_PDD_TOKZN (pTOKEN) ; 

_level  +“  1; 

_timemame  » "TRT."; 
while  (TRUE)  { 

/*  line  1259  "FDDI.MP"  --  [11]?  TOKEN  */ 

/*  IDT  returns  Token.  */ 
pTOKEN  - TOKEN_Rl  ()  ; 

_buff  er  * Receive_PDD  (_timemcune) ; 
if  ( I s_PDD_TOKEN (pTOKEN,  _buf fer) ) { 

_level  +*=  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  1265  "FDDI.MP"  — [11]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 
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[11] 7 TIMEOUT  */ 


} 


/*  line  1268  "FDDI.MP"  — 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 


return 

(TRUE)  ; 

/* 

end 

of 

level 

[11]  */ 

/* 

end 

of 

level 

[10]  */ 

/* 

end 

of 

level 

[9]  */ 

/* 

end 

of 

level 

[8]  */ 

/* 

end 

of 

level 

[7]  */ 

} 

/*  line  1271  "FDDI.MP"  — [6)7  OTHERWISE  */ 
if  (_buffer)  { 

_level  +“  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 


} 

/*  line  1274  "FDDI.MP"  — [6]?  TIMEOUT  */ 
if  (Timeout ("TRT. ")  ) { 

_level  +=  1; 

SetfVerdict (FAIL)  ; 
return  (TRUE) ; 

} 


} 

/* 

end 

of 

level 

[6] 

*/ 

} 

/* 

end 

of 

level 

[5] 

*/ 

) 

} 

} 

/* 

end 

of 

level 

[4] 

*/ 

/* 

end 

of 

level 

[3] 

*/ 

} 

\ 

/* 

end 

of 

level 

[2] 

*/ 

) 

_level 

- _lastlevel; 

return 

(FALSE) ; 

/* 

end 

of 

level 

[1] 

*/ 

/* 

* TRTtesting  — Testing  MAC  Monitoring  function  1:  TRT  Monitoring  Function 
*/ 
int 

TRTtesting  () 

{ 

int  _lastlevel; 

_time  - 0; 

_level  “1; 
strcpy(R,  "NONE") ; 

Result  - NONE; 

_timername  “ (char  *)  0; 

_bufferlen  - -1; 

/*  line  1283  "FDDI.MP"  --  [1]+  */ 

/*  Initializing  Connection  */ 

_lastlevel  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +“  1; 
while  (TRUE)  { 

/*  line  1286  "FDDI.MP"  — [2]!  ECHO_Req  */ 

/*  Tester  sends  SMT  ECHO  Request  frame.  */ 
pECHO_Req  - ECHO_Req_Tl () ; 

Send_PDD_ECHO_Req (pECHO_Req) ; 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1291  "FDDI.MP"  — [3] 7 TIMEOUT  */ 
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/*  Causing  TRT  expired.  */ 
if  (Timeout (”TRT. ") ) { 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1293  "FDDI.MP"  — [4]  */ 

Start_timer ("TRT. ",  (long)  TTRT  1000); 

_level  +”  1; 
while  (TRUE)  { 

/*  line  1296  "FDDI.MP"  — [5]?  TIMEOUT  */ 

/*  Causing  TRT  expired  twice  and  To)cen  never  has  been  seen.  */ 
if  (Timeout ("TRT. ") ) { 

_level  +•»  1; 
while  (TRUE)  { 

/*  line  1298  "FDDI.MP"  — [6]  */ 

Start_timer ("TRT.TRTclaim",  (long)  T_Max  1000) ; 

_level  +*  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1300  "FDDI.MP"  — [7]?  CLAIM  */ 

/*  lUT  initiates  Claim  To)cen  process.  */ 
pCLAIM  -=  CLAIM_R1  ()  ; 

_buff er  “ Receive_PDU (_timername) ; 
if  (Is_PDU_CLAIM(pCLAIM,  _buf fer) ) { 

_level  +=  1; 
while  (TRUE)  { 

/*  line  1304  "FDDI.MP"  — [8]!  CLAIM  */ 

/*  Tester  repeats  Claim  frame.  */ 
pCLAIM  •=  CLAIM_T1  ()  ; 

Send_PDU_CLAIM (pCLAIM) ; 

Start_timer ("TRT. ",  (long)  TTRT  1000); 

_level  +*  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1308  "FDDI.MP"  --  [9]?  TOKEN  */ 

/*  lUT  issues  Tolcen . */ 

pTOKEN  « T0KEN_R1 ( ) ; 

_buffer  - Receive_PDU (_timername) ; 
if  (Is_PDU_TOKEN(pTOKEN,  _buf fer) ) { 

_level  +“  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  1314  "FDDI.MP"  --  [9]7  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

/*  line  1317  "FDDI.MP"  --  [9]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [9]  */ 

} /*  end  of  level  [8]  */ 

} 

/*  line  1320  "FDDI.MP"  — [7]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1323  "FDDI.MP"  — [7]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 
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SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 


} 

/* 

end 

of 

level 

[7] 

*/ 

} 

) 

} 

/* 

end 

of 

level 

[6] 

*/ 

/* 

end 

of 

level 

[5] 

*/ 

} 

} 

) 

/* 

end 

of 

level 

[4] 

*/ 

/* 

end 

of 

level 

[3] 

*/ 

} 

\ 

/* 

end 

of 

level 

[2] 

*/ 

/ 

_level 

■ _lastlevel; 

return 

(FALSE) ; 

/* 

end 

of 

level 

[1] 

*/ 

/* 

* TVXtesting  — Testing  MAC  Monitoring  function  2:  TVX  Monitoring 
*/ 
int 

TVXtesting ( ) 

{ 

int  _lastlevel; 

_time  - 0; 

_level  - 1; 
strcpy(R,  "NONE") ; 

Result  “ NONE; 

_timername  ••  (char  *)  0; 

_bufferlen  -•  -1; 

/*  line  1331  "FDDI.MP"  --  [1]+  */ 

/*  Initializing  Connection (test  group)  */ 

_last level  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +*  1; 

_timernaine  - (char  *)  0; 

_time  “ 0; 

_bufferlen  - -1; 
while  (TRUE)  { 

/*  line  1334  "FDDI.MP"  --  [2]+  */ 

/*  Subtree  1 */ 

_lastlevel  » _level; 
if  (TVX_SDBTREE1 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +“  1; 

_tiinemame  - (char  *)  0; 

_time  - 0; 

_bufferlen  “ -1; 
while  (TRUE)  { 

/*  line  1337  "FDDI.MP"  — [3]+  */ 

/*  Initializing  Connect ion (test  group)  */ 

_lastlevel  ■ _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +-  1; 

_timername  - (char  *)  0; 

_time  - 0; 

_bufferlen  - -1; 
while  (TRUE)  { 

/*  line  1340  "FDDI.MP"  --  [4)+  */ 

/*  Subtree  2 */ 

_la St level  - _level; 
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if  (TVX_SUBTREE2 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +-  1; 
return  (FALSE); 

} 

_level  - _lastlevel; 

) /*  end  of  level  [4]  */ 

} 

_level  “ _lastlevel; 

) /*  end  of  level  [3]  */ 

} 

_level  - _lastlevel; 

} /*  end  of  level  [2]  */ 

} 

_level  = _lastlevel; 
return  (FALSE) ; 

} /*  end  of  level  [1]  */ 

int 

TVX_SUBTREE1 () 

{ 

int  _lastlevel; 

/*  line  1344  "FDDI.MP"  — [1]!  DATA_OverMaxLen  */ 

/* 

* Tester  sends  tester  frame (DA=IUT  Address;  Frame  symbol  time>TVX) , 

* cause  TVX  expire. 

*/ 

pDATA_OverMaxLen  * DATA_OverMaxLen_Tl () ; 

Send_PDU_DATA_OverMaxLen (pDATA_OverMaxLen) ; 

_level  +=  1; 
while  (TRUE)  { 

/*  line  1348  "FDDI.MP"  — [2]  */ 

Start_timer ("TRT.TRTclaim",  (long)  T_Maxl000); 

_level  +=  1; 

_t i me  rn ame  * " TRT . " ; 
while  (TRUE)  { 

/*  line  1350  "FDDI.MP"  — [3]?  CLAIM  */ 

/*  lUT  initiates  Claim  To)cen  process.  */ 
pCLAIM  « CLAIM_R1  ()  ; 

_buffer  ••  Receive_PDD  (_timername)  ; 
if  (Is_PDD_CLAIM(pCLAIM,  _buf fer) ) { 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1354  "FDDI.MP"  — [4]!  CLAIM  */ 

/*  Tester  repeats  the  Claim  frame  sent  by  lUT.  */ 
pCLAIM  « CLAIM_T1  ()  ; 

Send_PDD_CLAIM(pCLAIM) ; 

Start_timer ("TRT. ",  (long)  TTRT  1000) ; 

_level  +«  1; 

_timername  * "TRT."; 
while  (TRUE)  { 

/*  line  1358  "FDDI.MP"  --  [5]?  TOKEN  */ 

/*  IDT  issues  To)cen . */ 

pTOKEN  - T0KEN_R1  ()  ; 

_buf fer  - Receive_PDD (_timername) ; 
if  (Is_PDU_TOKEN(pTOKEN,  _buffer) ) { 

_level  +•=  1; 

SetfVerdict  (PASS)  ; 
return  (FALSE) ; 

} 

/*  line  1364  "FDDI.MP"  --  [5]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +“  1 ; 

SetfVerdict  (FAIL)  ; 
return  (FALSE) ; 


} 
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[5] ? TIMEOUT  */ 


/*  line  1367  "FDDI.MP"  — 
if  (Timeout ("TRT. ")  ) { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (FALSE) ; 

} 

} /*  end  of  level  [5]  */ 

} /*  end  of  level  [4]  */ 

} 

/*  line  1370  "FDDI.MP"  — [3]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (FALSE) ; 

} 

/*  line  1373  "FDDI.MP"  — [3]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-•  1; 

SetfVerdict (FAIL)  ; 


return  (FALSE) ; 

} 


} 

/* 

end 

of 

level 

[3] 

*/ 

} 

/* 

end 

of 

level 

[2] 

*/ 

/* 

end 

of 

level 

[1] 

*/ 

int 

TVX_SUBTREE2  0 

{ 

int  _lastlevel; 

E: 

if  (timername  0) 

_timername  - "TVX."; 

/*  line  1378  "FDDI.MP"  — [1]?  TIMEOUT  */ 

/*  Holds  To)cen  and  sends  Idle  symbols  until  TVX  expires 
if  (Timeout ("TVX. ") ) { 

_level  +-  1; 
return  (FALSE) ; 

} 

/*  line  1380  "FDDI.MP"  --  [1] ! IDLE  */ 
pIDLE  - IDLE_I(); 

Send_PDU_IDLE (pIDLE) ; 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1383  "FDDI.MP"  — [2]  */ 

if  ((a  — 0))  { 

_level  +-  1; 

J*  line  1385  "FDDI.MP"  --  [3]?  GOTO  */ 
goto  E; 

} 

/*  line  1387  "FDDI.MP"  — .[2]  */ 

Start_timer ("TRT.TRTclaim",  (long)  T_Max  1000) ; 

_level  +-  1; 

_timername  « "TRT."; 
while  (TRUE)  { 

/*  line  1389  "FDDI.MP"  — [3]?  CLAIM  */ 

/*  lUT  starts  Claim  To)cen  process.  */ 
pCLAIM  - CLAIM_R1  ()  ; 

_buff er  ■ Receive_PDU  (_timemame)  ; 
if  (Is_PDD_CLAIM(pCLAIM,  _buf fer) ) { 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1393  "FDDI.MP"  — [4]!  CLAIM  */ 
pCLAIM  - CLAIM_T1  ()  ; 

Send__PDD_CLAIM  (pCLAIM)  ; 

Start_timer ("TRT. ",  (long)  TTRT  1000); 

_level  +-  1; 

_timemame  - "TRT."; 
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[5] ? TOKEN  */ 


while  (TRUE)  { 

/*  line  1396  "FDDI.MP" 
pTOKEN  - TOKEN_Rl(); 

_buffer  - Receive_PDU (_timername) ; 
if  (Is_PDO_TOKEN(pTOKEN,  _buf fer) ) { 

_level  +-  1; 

SetfVerdict (RESULT) ; 
return  (TRUE) ; 

} 

/*  line  1401  "FDDI.MP"  — [5]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

/*  line  1404  "FDDI.MP"  — [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ")  ) { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [5]  */ 

} /*  end  of  level  [4]  */ 

} 

/*  line  1407  "FDDI.MP"  --  [3]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +=  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1410  "FDDI.MP"  — [3]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +=  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

) /*  end  of  level  [3]  */ 

} /*  end  of  level  [2]  */ 

) /*  end  of  level  [1]  */ 


/* 

* PHInvalidRlOb  — Testing  MAC  Frame  Error  Detection  1:  R(lOb)  — a 

* transition  at  MAC  receive  state  machine 
*/ 

int 

PHInvalidRlOb 0 

{ 

int  _lastlevel; 

_time  » 0; 

_level  - 1; 
strcpy(R,  "NONE"); 

Result  - NONE; 

_timername  ■*  (char  *)  0; 

_bufferlen  » -1; 

/*  line  1419  "FDDI.MP"  --  [1]+  */ 

/*  Initializing  Connection  */ 

_lastlevel  - _level; 
if  (INITCONNECT  0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +«  1; 
while  (TRUE)  { 

/*  line  1422  "FDDI.MP"  — [2] ! DATA  */ 

/*  Tester  sends  the  frame (DA- IDT  Address;  A Invalid  Symbol  in  PA) 
pDATA  - DATA  T3  ()  ; 
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Send_PDU_DATA (pDATA) ; 

_level  +“  1/ 
while  (TRUE)  { 

/*  line  1426  "FDDI.MP"  — [3]!  TOKEN  */ 

/*  followed  by  Token.  */ 
pTOKEN  - T0KEN_T1 0 ; 

Send_PDU_TOKEN (pTOKEN) ; 

_level  +-  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1430  "FDDI.MP"  — [4]?  DATA_Strip  */ 

/*  Idles  returned  */ 
pDATA_Strip  - DATA_Strip_Rl () ; 

_buffer  “ Receive_PDU (_timername) ; 
if  (Is_PDU_DATA_Strip (pDATA_Strip,  _buffer) ) ( 

_level  +-  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1434  "FDDI.MP"  --  [5]?  TOKEN  */ 

/*  followed  by  Token.  */ 
pTOKEN  - TOKEN_Rl  ()  ; 

_buffer  ■=  Receive_PDU  (_tiniername)  ; 
if  ( I s_PDU_TOKEN (pTOKEN,  _buf fer) ) { 

_level  +•=  1 ; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

) 

/*  line  1440  "FDDI.MP"  — [5]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1443  "FDDI.MP"  — [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ")  ) { 

_level  +«■  1; 

SetfVerdict (FAIL)  ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [5]  */ 

} 

/*  line  1446  "FDDI.MP"  — [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

line  1449  "FDDI.MP"  — [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 


SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 


) 

/* 

end 

of 

level 

[4] 

*/ 

) 

/* 

end 

of 

level 

[3] 

*/ 

) 

/* 

end 

of 

level 

[2] 

*/ 

/ 

_level  - _last level; 

return  (FALSE) ; 

/* 

end 

of 

level 

[1] 

*/ 

/* 

* PHInvalidR20b  — Testing  MAC  Frame  Error  Detection  2: 

* transition  at  MAC  receive  state  machine 

V 


R(20b)  “ a 
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lastlevel; 


int 

PHInvalidR20b  () 

{ 

int 

_time  0; 

_level  - 1; 
strcpy(R,  "NONE"); 

Result  ••  NONE; 

_timername  - (char  *)  0; 

_bufferlen  “ -1; 

/*  line  1457  "FDDI.MP"  — [1]+  */ 

/*  Initializing  Connection  */ 

_lastlevel  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1460  "FDDI.MP"  --  [2] ! DATA  */ 

/* 

* Tester  sends  the  f rame  (DA“IUT  Address;  a Invalid  Syinbol  after  J in 

* SD) 

*/ 

pDATA  = DATA_T4(); 

Send_PDU_DATA  (pDATA)  ; 

_level  +“  1; 
while  (TRUE)  { 

/*  line  1464  "FDDI.MP"  — [3]!  TOKEN  */ 

/*  followed  by  Token.  */ 
pTOKEN  = T0KEN_T1(); 

Send_PDU_TOKEN(pTOKEN) ; 

_level  +=  1; 

_timername  = "TRT."; 

/ while  (TRUE)  { 

/*  line  1468  "FDDI.MP"  --  [4]?  DATA_Strip  */ 

/*  PA  returned,  */ 
pDATA_Strip  - DATA_Strip_Rl () ; 

_buffer  - Receive_PDU  (_tiiT\ername)  ; 
if  (Is_PDU_DATA_Strip  (pDATA_Strip,  _buf fer) ) { 

_level  +-  1; 

_timemame  ■ "TRT."; 
while  (TRUE)  { 

/*  line  1472  "FDDI.MP"  --  [5]?  TOKEN  */ 

/*  followed  by  Token.  */ 
pTOKEN  - T0KEN_R1(); 

_buff er  - Receive_PDD  (_timemame)  ; 
if  ( I s_PDD_TOKEN (pTOKEN,  _buf fer) ) { 

_level  +-  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  1478  "FDDI.MP"  — [5]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1481  "FDDI.MP"  — [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

) /*  end  of  level  [5]  */ 

} 

/*  line  1484  "FDDI.MP"  — [4]?  OTHERWISE  */ 
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if  (_buffer)  { 

_level  +-  1 ; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

/*  line  1487  "FDDI.MP"  — [4]?  TIMEOUT  */ 
if  (Timeout  ("TRT.  •')  ) ( 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

} 

} 

) 

} 

_level  - _lastlevel; 
return  (FALSE) ; 

} 


/* 

end 

of 

level 

[4] 

*/ 

/* 

end 

of 

level 

[3] 

*/ 

/* 

end 

of 

level 

[2] 

*/ 

/* 

end 

of 

level 

[1] 

*/ 

/* 

* PHInvalidRSOb  — Testing  MAC  Frame  Error  Detection  3:  R(30b)  — a 

* transition  at  MAC  receive  state  machine 
*/ 

int 

PHInvalidR30b 0 

( 

int  _la St level; 

_time  * 0; 

_level  - 1; 
strcpy (R,  "NONE"); 

Result  = NONE; 

_timername  « (char  *)  0; 

_bufferlen  -1; 

/*  line  1495  "FDDI.MP"  — [1]+  */ 

/*  Initializing  Connection  */ 

_lastlevel  « _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +«  1; 
while  (TRUE)  { 

/*  line  1498  "FDDI.MP"  — [2]!  DATA  */ 

/*  Tester  sends  the  frame (DA-IUT  Address;  a Invalid  Symbol  in  INFO) 
pDATA  - DATA_T5(); 

Send_PDU_DATA (pDATA) ; 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1502  "FDDI.MP"  — [3]!  TOKEN  */ 

/*  followed  by  To)cen.  */ 
pTOKEN  - T0KEN_T1  ()  ; 

Send_PDU_TOKEN (pTOKEN) ; 

_level  +-  1; 

_timername  "TRT."; 
while  (TRUE)  { 

/*  line  1506  "FDDI.MP"  — [4]?  DATA_Strip  */ 

/*  PA, SD, FC, DA, SA  and  Idles  returned,  */ 
pDATA_Strip  - DATA_Strip_R2 () ; 

_buf f er  “ Receive_PDU (_timername) ; 
if  (Is_PDU_DATA_Strip(pDATA_Strip,  _buf fer) ) { 

_level  +-  1; 

_timemame  - "TRT."; 
while  (TRUE)  { 

/*  line  1510  "FDDI.MP"  — [5]?  TOKEN  */ 

/*  followed  by  Token.  */ 
pTOKEN  - TOKEN_Rl(); 
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_buffer  - Receive_PDU (_timername) ; 
if  (Is_PDU_TOKEN (pTOKEN,  _buffer) ) { 

_level  +“  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

) 

/*  line  1516  "FDDI.MP"  — [5]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1519  "FDDI.MP"  --  [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [5]  */ 

} 

/*  line  1522  "FDDI.MP"  --  [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +=  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1525  "FDDI.MP"  — [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-=  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 


} 

/* 

end 

of 

level 

[4] 

*/ 

} 

/* 

end 

of 

level 

[3) 

*/ 

) 

) 

_level  - _lastlevel; 

/* 

end 

of 

level 

[2] 

*/ 

return  (FALSE) ; 

/* 

end 

of 

level 

[1] 

*/ 

/* 

* PHInvalidR40b  — Testing  MAC  Frame  Error  Detection  4:  R(40b)  - — a 

* transition  at  MAC  receive  state  machine 
*/ 

int 

PHInvalidR4  0b() 

{ 

int  _lastlevel; 

_time  - 0; 

_level  “1; 
strcpy(R,  "NONE"); 

Result  “ NONE; 

_timemame  « (char  *)  0; 

_bufferlen  « -1; 

/*  line  1533  "FDDI.MP"  --  [1]+  */ 

_last level  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +■  1; 
while  (TRUE)  { 

/*  line  1535  "FDDI.MP"  — [2]!  DATA  */ 

/*  Tester  sends  the  frame (DA-IUT  Address;  a Invalid  Symbol  in  FS) 
pDATA  - DATA_T6(); 

Send__PDD_DATA  (pDATA)  ; 
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_level  +-.1; 
while  (TRUE)  { 

/*  line  1539  "FDDI.MP"  --  [3]!  TOKEN  */ 

/*  followed  by  Token.  */ 
pTOKEN  - T0KEN_T1(); 

Send_PDU_TOKEN (pTOKEN) ; 

__level  +-  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1543  "FDDI.MP"  — [4]?  DATA_Strip  */ 

/*  PA,  SD,  FC,  DA,  SA,  INFO,  FCS,  ED  and  FS  returned (E-S,  A-S,  C-S)  */ 
pDATA_Strip  - DATA_Strip_R4 () ; 

_buff er  “ Receive_PDU  (__timername)  ; 
if  (Is__PDU_DATA_Strip  (pDATA_Strip,  _buf fer)  ) { 

_level  +-  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1547  "FDDI.MP"  — [5]?  TOKEN  */ 

/*  followed  by  Token.  */ 
pTOKEN  - TOKEN_Rl ( ) ; 

_buffer  - Receive_PDU  (_timemame)  ; 
if  ( I s_PDU__TOKEN  (pTOKEN,  _buf  fer)  ) { 

_level  +-  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  1553  "FDDI.MP"  — [5]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +=  1; 

SetfVerdict (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1556  "FDDI.MP"  — [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-=  1 ; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [5]  */ 

} 

/*  line  1559  "FDDI.MP"  — [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +■■  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1562  "FDDI.MP"  — [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +■  1; 

SetfVerdict (FAIL) ; 


return  (TRUE) / 

) 


} 

/* 

end 

of 

level 

[4] 

*/ 

) 

/* 

end 

of 

level 

[3] 

*/ 

} 

} 

_level  ■ _last level; 

/* 

end 

of 

level 

[2] 

*/ 

return  (FALSE) ; 

I* 

end 

of 

level 

[1] 

*/ 

/* 

* DetectSD  — Testing  MAC  Frame  Error  Detection  5;  Detecting  SD 
V 
int 

DetectSD  () 
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lastlevel; 


int 

_time  - 0; 

_level  - 1; 
strcpy(R,  "NONE"); 

Result  NONE; 

_timername  - (char  *)  0; 

_bufferlen  - -1; 

/*  line  1570  "FDDI.MP"  — [1]+  */ 

/*  Initializing  Connection  */ 

_lastlevel  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +=  1; 
while  (TRUE)  { 

/*  line  1573  "FDDI.MP"  --  [2]!  DATA  */ 

/*  Tester  sends  the  frame (DA«IUT  Address;  an  Idle  Symbol  after  J) 
pDATA  = DATA_T7_0  ()  ; 

Send_PDU_DATA (pDATA) ; 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1577  "FDDI.MP"  — [3]!  TOKEN  */ 

/*  Followed  by  Token.  */ 
pTOKEN  - T0KEN_T1  ()  ; 

Send_PDU_TOKEN (pTOKEN) ; 

_level  +=»  1; 

_timemame  "TRT."; 
while  (TRUE)  { 

/*  line  1581  "FDDI.MP"  --  [4]?  DATA_Strip  */ 

/*  PA  and  Idles  returned.  */ 
pDATA_Strip  *=  DATA_Strip_Rl  ()  ; 

_buffer  * Receive_PDU  (_timemame)  ; 
if  (Is_PDU_DATA_Strip (pDATA_Strip,  _buf fer) ) { 

_level  +*  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1585  "FDDI.MP"  --  [5]?  TOKEN  */ 

/*  Followed  by  Token.  */ 
pTOKEN  ■=  T0KEN_R1  ()  ; 

_buffer  - Receive_PDD (_timername) ; 
if  ( I s_PDD_TOKEN (pTOKEN,  _buf fer) ) { 

_level  +*=  1; 

SetfVerdict  (PASS)  ; 
return  (FALSE) ; 

} 

/*  line  1591  "FDDI.MP"  — [5]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (FALSE) ; 

} 

/*  line  1594  "FDDI.MP"  --  [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (FALSE) ; 

1 

) /*  end  of  level  [5]  */ 

} 

/*  line  1597  "FDDI.MP"  --  [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (FALSE) ; 


} 


154 


[4]?  TIMEOUT  */ 


/*  line  1600  "FDDI.MP"  — 
if  (Timeout  ("TRT.  ’’)  ) { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
while  (TRUE)  { 

/*  line  1602  "FDDI.MP"  --  [5]!  DATA  */ 

/* 

* Tester  sends  the  f rame (DA-IUT  Address;  other  symbol (not  K 

* symbol)  before  K in  SD) 

*/ 

pDATA  - DATA_T7_1  ()  ; 

Send_PDU_DATA  (pDATA)  ; 

Start_timer ("TRT. ",  (long)  TTRT  1000); 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1606  "FDDI.MP"  — [6] ! TOKEN  */ 

/*  followed  by  To)cen.  */ 
pTOKEN  - T0KEN_T1(); 

Send_PDU_TOKEN (pTOKEN) ; 

_level  4—  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1610  "FDDI.MP"  --  [7]?  DATA_Strip  */ 

/*  PA  and  Idle  returned,  */ 
pDATA_Strip  «=  DATA_Strip_Rl  ()  ; 

_buffer  “ Receive_PDU (_timername) ; 
if  (Is_PDU_DATA_Strip (pDATA_Strip,  _buffer) ) { 

_level  +”  1; 

_timername  •=  "TRT."; 
while  (TRUE)  { 

/*  line  1614  "FDDI.MP"  --  [8]?  TOKEN  */ 

/*  followed  by  To)cen.  */ 
pTOKEN  - T0KEN_R1  ()  ; 

_buffer  -«  Receive_PDU  (_timername)  ; 
if  ( I s_PDU_TOKEN (pTOKEN,  _buf fer) ) { 

_level  +-  1; 

SetfVerdict (RESULT) ; 
return  (TRUE) ; 

} 

/*  line  1620  "FDDI.MP"  — [8]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1623  "FDDI.MP"  — [8]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +«  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [8]  */ 

} 

/*  line  1626  "FDDI.MP"  — [7]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1629  "FDDI.MP"  — [7]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

) /*  end  of  level  [7]  */ 
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} 

/* 

end 

of 

level 

[6] 

*/ 

} 

} 

} 

/* 

end 

of 

level 

[5] 

*/ 

/* 

end 

of 

level 

[4] 

*/ 

} 

/* 

end 

of 

level 

[3] 

*/ 

} 

} 

_level  “ _lastlevel; 
return  (FALSE) ; 

/* 

end 

of 

level 

[2] 

*/ 

/* 

end 

of 

level 

[1] 

*/ 

* DetectFC  — Testing  MAC  Frame  Error  Detection  6:  Detecting  FC 
*/ 
int 

DetectFC 0 

{ 

int  _la St level; 

_time  >=  0; 

_level  =1; 
strcpy(R,  "NONE"); 

Result  “ NONE; 

_timername  **  (char  *)  0; 

_bufferlen  * -1; 

/*  line  1637  "FDDI.MP"  — [1]+  */ 

/*  Initializing  Connection  */ 

_last level  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +“  1; 
while  (TRUE)  { 

/*  line  1640  "FDDI.MP"  — [2]!  DATA  */ 

/* 

* Tester  sends  the  f rame  (DA=IUT  Address;  a symbol  sec[uence  (not  Idle(s) 

* or  nn)  after  K in  FC) , 

*/ 

pDATA  - DATA_T8(); 

Send_PDD_DATA  (pDATA)  ; 

_level  +“  1; 
while  (TRUE)  { 

/*  line  1644  "FDDI.MP"  — [3]!  TOKEN  */ 

/*  followed  by  Token.  */ 
pTOKEN  - T0KEN_T1  ()  ; 

Send_PDD_TOKEN (pTOKEN) ; 

_level  +■•  1; 

_timemame  - "TRT."; 
while  (TRUE)  { 

/*  line  1648  "FDDI.MP"  — [4]?  DATA_Strip  */ 

/*  PA,  SD  and  Idles  returned,  */ 
pDATA_Strip  - DATA_Strip_R5 () ; 

_buf fer  - Receive_PDU (_timername) ; 
if  (Is_PDD_DATA_Strip (pDATA_Strip,  _buf fer) ) { 

_level  +“  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1652  "FDDI.MP"  — [5]?  TOKEN  */ 

/*  followed  by  Token.  */ 
pTOKEN  - TOKEN_Rl  ()  ; 

_buffer  - Receive_PDU  (_timemame)  ; 
if  ( I s_PDD_TOKEN (pTOKEN,  _buf fer) ) { 

_level  +«  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 
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[5]?  OTHERWISE  */ 


/*  line  1658  "FDDI.MP"  — 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1661  "FDDI.MP"  — [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [5]  */ 

} 

/*  line  1664  "FDDI.MP"  — [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +■■  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

I*  line  1667  "FDDI.MP"  — [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 


} 

/* 

end 

of 

level 

[4] 

*/ 

} 

/* 

end 

of 

level 

[3] 

*/ 

} 

} 

_level  -=  _lastlevel; 

/* 

end 

of 

level 

[2] 

*/ 

return  (FALSE) ; 

/* 

end 

of 

level 

[1] 

*/ 

/* 

* DetectFrameBodyl  — Testing  MAC  Frame  Error  DEtection  7;  Detecting  Frame 

* Body  1 

V 

int 

DetectFrameBodyl  () 

( 

int  _lastlevel; 

_time  » 0; 

_level  - 1; 

3trcpy(R,  "NONE"); 

Result  - NONE; 

_timername  - (char  *)  0; 

_bufferlen  - -1; 

/*  line  1675  "FDDI.MP"  — [1]+  */ 

/*  Initializing  Connection  */ 

_lastlevel  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1678  "FDDI.MP"  — [2]!  DATA  */ 

/*  Tester  sends  the  f rame (DA-IUT  Address;  an  Idle  symbol  in  INFO),  */ 
pDATA  - DATA_T9(); 

Send_PDD_DATA  (pDATA)  ; 

_level  +-  1; 
while  (TRUE)  ( 

/*  line  1682  "FDDI.MP"  — [3] ! TOKEN  */ 

/*  followed  by  To)cen.  */ 
pTOKEN  - T0KEN_T1(); 
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Send_PDU_TOKEN (pTOKEN) ; 

_level  +“  1; 

_timernaine  ■■  "TRT."; 
while  (TRUE)  { 

/*  line  1686  "FDDI.MP"  — [4]?  DATA_Strip  */ 

/*  PA,  SD,  FC,  DA,  SA  and  Idles  returned,  */ 
pDATA_Strip  - DATA_Strip_R2 () ; 

_buffer  ■«  Receive_PDU  (_timername)  ; 
if  (Is_PDU_DATA_Strip(pDATA_Strip,  _buf fer) ) { 

_level  +=“  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1690  "FDDI.MP"  — [5]?  TOKEN  */ 

/*  followed  by  To)cen.  */ 
pTOKEN  - TOKEN_Rl  ()  ; 

_buffer  Receive_PDU  (_timername)  ; 
if  (I s_PDU_TOKEN (pTOKEN,  _buf fer) ) { 

_level  +-  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  1696  "FDDI.MP"  --  [5]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +•=  1; 

SetfVerdict (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1699  "FDDI.MP"  — [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +=  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [5]  */ 

} 

/*  line  1702  "FDDI.MP"  — [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1705  "FDDI.MP"  --  [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 


) 

/* 

end 

of 

level 

[4] 

*/ 

} 

/* 

end 

of 

level 

[3] 

*/ 

} 

} 

_level  ■»  _lastlevel; 

/* 

end 

of 

level 

[2] 

*/ 

return  (FALSE) ; 

/* 

end 

of 

level 

[1] 

*/ 

/* 

* DetectFrameBody2  Testing  MAC  Frame  Error  Detection  8:  Detecting  Frame 

* Body  2 
*/ 

int 

DetectFrameBody2  () 

( 


int 

_time  - 0; 
_level  - 1; 


last level; 
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strcpy(R,  "NONE") ; 

Result  - NONE; 

_timername  - (char  *}  0; 

_bufferlen  - -1; 

/*  line  1713  "FDDI.MP"  — (1)+  */ 

/*  Initializing  Connection  */ 

_lastlevel  _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +-  1; 
while  (TRUE)  ( 

/*  line  1716  "FDDI.MP"  — [2]!  DATA  */ 

/* 

* Tester  sends  the  f rame (DA-IUT  Address;  a symbol (not  Idle  or  data)  in 

* INFO) , 

*/ 

pDATA  - DATA_T10(); 

Send_PDU_DATA  (pDATA)  ; 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1720  "FDDI.MP"  — [3]!  TOKEN  */ 

/*  followed  by  To)cen.  */ 
pTOKEN  » T0KEN_T1  ()  ; 

Send_PDU_TOKEN (pTOKEN) ; 

_level  +-  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1724  "FDDI.MP"  — [4]?  DATA_Strip  */ 

/*  PA,  SD,  FC,  DA,  SA  and  Idles  returned,  */ 
pDATA_Strip  - DATA_Strip_R2 () ; 

_buffer  = Receive_PDU (_timername) ; 
if  (Is_PDU_DATA_Strip (pDATA_Strip,  _buf fer) ) { 

_level  +»  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1728  "FDDI.MP"  — [5]?  TOKEN  */ 

/*  followed  by  Tolcen  */ 
pTOKEN  - T0KEN_R1  ()  ; 

_buffer  “ Receive_PDU (_timername) ; 
if  ( I s_PDD_TOKEN (pTOKEN,  _buf fer) ) { 

_level  +-  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

) 

/*  line  1734  "FDDI.MP"  --  [5]?  OTHERWISE  */ 
if  (_buffer)  ( 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

/*  line  1737  "FDDI.MP"  — [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

) /*  end  of  level  [5]  */ 

} 

/*  line  1740  "FDDI.MP"  — [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

I*  line  1743  "FDDI.MP"  — [4]?  TIMEOUT  */ 
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if  (Timeout ("TRT. ") ) { 

_level  +-  1; 
SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 


} 

/* 

end 

of 

level 

[4] 

*/ 

} 

/* 

end 

of 

level 

[3] 

*/ 

} 

} 

level  - lastlevel; 

/* 

end 

of 

level 

[2] 

*/ 

return  (FALSE) ; 

/* 

end 

of 

level 

[1] 

*/ 

/* 

* DetectInvalidLength  — Testing  Frame  Error  Detection  9:  Detecting  Invalid 

* Data  Length  Frame 
*/ 

int 

DetectInvalidLength () 

( 

int  _lastlevel; 

_time  “ 0; 

_level  - 1; 
strcpy(R,  "NONE"); 

Result  - NONE; 

_timername  “ (char  *)  0; 

_bufferlen  - -1; 

/*  line  1751  "FDDI.MP"  --  [1]+  */ 

_last level  « _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +=  1; 
while  (TRUE)  { 

/*  line  1753  "FDDI.MP"  — [2]!  DATA_InvLen  */ 

/* 

* Tester  sends  the  frame  (DA=IUT  Address;  a Invalid  Data  Length 

* Frame) , 

*/ 

pDATA_InvLen  DATA_InvLen__Tl  ()  ; 

Send_PDU_DATA_InvLen (pDATA_InvLen) ; 

_level  +*  1; 
while  (TRUE)  { 

/*  line  1757  "FDDI.MP"  — [3]!  TOKEN  */ 

/*  followed  by  To)cen.  */ 
pTOKEN  - T0KEN_T1  ()  ; 

Send_PDD_TOKEN (pTOKEN) ; 

_level  +••  1; 

_timername  = "TRT."; 
while  (TRUE)  { 

/*  line  1761  "FDDI.MP"  --  [4]?  DATA_Strip  */ 

/* 

* PA,  SD,  FC,  DA,  SA,  INFO,  FCS,  ED  and  FS  returned (A-S,  E-S, 

* C-R) , 

*/ 

pDATA_Strip  - DATA_Strip_R3 () ; 

_buffer  - Receive_PDU (_timername) ; 
if  (Is_PDU_DATA_Strip (pDATA_Strip,  _buf fer) ) { 

_level  +“  1; 

_timername  « "TRT."; 
while  (TRUE)  { 

/*  line  1765  "FDDI.MP"  — [5]?  TOKEN  */ 

/*  followed  by  To)cen.  */ 
pTOKEN  - T0KEN_R1  ()  ; 

^buffer  “ Receive_PDU  (_timemame)  ; 
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if  (Is_PDU_TOKEN(pTOKEN,  _buf fer) ) { 

_level  +-  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

) 

/*  line  1771  "FDDI.MP"  — [5]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +-  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1774  "FDDI.MP"  — [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +“  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [5]  */ 

} 

/*  line  1777  "FDDI.MP"  --  [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +=  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1780  "FDDI.MP"  — [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +“  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 


} 

/* 

end 

of 

level 

[4] 

*/ 

} 

/* 

end 

of 

level 

[3] 

*/ 

} 

} 

_level  - _lastlevel; 

/* 

end 

of 

level 

[2] 

*/ 

return  (FALSE) ; 

/* 

end 

of 

level 

[1] 

*/ 

* DetectFCS  — Testing  Frame  Error  Detection  10:  Detecting  FCS  Error 
*/ 
int 

DetectFCS  () 

{ 

int  _lastlevel; 

_time  - 0; 

_level  - 1; 
strcpy(R,  "NONE") ; 

Result  - NONE; 

_timername  - (char  *)  0; 

_bufferlen  - -1; 

/*  line  1788  "FDDI.MP"  --  [1]+  */ 

/*  Intializing  Connection  */ 

_lastlevel  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1791  "FDDI.MP"  — [2] ! DATA  * / 

/*  Tester  sends  the  frame (DA- IDT  Address;  FCS  errors),  */ 
pDATA  - DATA_T11_0 0 ; 

Send_PDD_DATA  (pDATA) ; 

_level  +-  1; 


i61 


while  (TRUE)  { 

/*  line  1795  "FDDI.MP"  — [3]!  TOKEN  */ 

/*  followed  by  Token.  */ 
pTOKEN  - T0KEN_T1  {)  ; 

Send_PDU_TOKEN (pTOKEN) ; 

_level  +-  1; 

_timername  » "TRT."; 
while  (TRUE)  { 

/*  line  1799  "FDDI.MP"  — [4]?  DATA  */ 

/*  lUT  repeats  Tester's  frame (A-S, E-S, C-R) , */ 

pDATA  •=  DATA_R11_0  0 ; 

_buffer  “ Receive_PDU (_timername) ; 
if  (Is_PDU_DATA(pDATA,  _buffer) ) { 

_level  +“  1; 

_timemame  ■=  "TRT."; 
while  (TRUE)  { 

/*  line  1803  "FDDI.MP"  — [5]?  TOKEN  */ 

/*  Token  returned.  */ 
pTOKEN  - T0KEN_R1  ()  ; 

_buffer  = Receive_PDU (_timername) ; 
if  ( I s_PDD_TOKEN (pTOKEN,  _buf fer) ) { 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1807  "FDDI.MP"  --  [6]!  DATA  */ 

/*  Tester  sends  the  f rame  (DAOIUT  Address;  FCS  error),  */ 
pDATA  = DATA_T11_1 0 ; 

Send_PDU_DATA (pDATA) ; 

_level  +»  1; 
while  (TRUE)  { 

/*  line  1811  "FDDI.MP"  --  [7]!  TOKEN  */ 

/*  followed  by  Token.  */ 
pTOKEN  - T0KEN_T1(); 

Send_PDU_TOKEN (pTOKEN)  ; 

_level  +=  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1815  "FDDI.MP"  — [8]?  DATA  */ 

/*  lUT  repeats  Tester's  f rame (A-R,  E*S,  C-R)  */ 
pDATA  - DATA_R11_1 0 ; 

_buf f er  - Receive_PDU (_timername) ; 
if  (Is_PDD_DATA(pDATA,  _buf fer) ) { 

_level  +“  1; 

_timername  ■ "TRT."; 
while  (TRUE)  { 

/*  line  1819  "FDDI.MP"  --  [9]?  TOKEN  */ 

/*  IDT  returns  Token.  */ 
pTOKEN  •=  T0KEN_R1  ()  ; 

_buff er  ” Receive_PDU (_timername) ; 
if  ( I s_PDU_TOKEN (pTOKEN,  _buf fer) ) { 

_level  +=  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  1825  "FDDI.MP"  — [9]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +*•  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1828  "FDDI.MP"  — [9]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +»  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

) /*  end  of  level  [9]  */ 
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[8]?  OTHERWISE  */ 


} 


) 

/*  line  1831  "FDDI.MP"  — 
if  (_buffer)  { 

_level  +■  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  line  1834  "FDDI.MP"  — 
if  (Timeout ("TRT. ") ) { 

_level  +=  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/*  end  of  level 
/*  end  of  level 
/*  end  of  level 


[8] ? TIMEOUT  */ 


[8]  */ 
[7]  V 
[6]  */ 


) 

/*  line  1837  "FDDI.MP"  — [5]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +=  1; 

SetfVerdict (FAIL) ; 
return  (TRUE)  ; 


} 

/*  line  1840  "FDDI.MP"  — [5]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +“  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 


) 

) /*  end  of  level  [5]  */ 

} 

/*  line  1843  "FDDI.MP"  — [4]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +=  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 


} 

/*  line  1846  "FDDI.MP"  — [4]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) ( 

_level  +“  1; 

SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 


} 

/* 

end 

of 

level 

[4] 

*/ 

} 

/* 

end 

of 

level 

[3] 

*/ 

} 

} 

_level  “ _lastlevel; 

/* 

end 

of 

level 

[2] 

*/ 

return  (FALSE) ; 

/* 

end 

of 

level 

[1] 

*/ 

/* 

* PHInvalidRSOb  — Testing  MAC  To)cen  Error  Detection  1;  R(50b)  — 

* transition  at  MAC  receive  state  machine 
*/ 

int 

PHInvalidRSOb 0 

{ 

int  _lastlevel; 

_time  ■ 0; 

_level  - 1; 
strcpy(R,  "NONE"); 

Result  - NONE; 

_tiinemame  - (char  *)  0; 

_bufferlen  ■ -1; 
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/*  line  1855  "FDDI.MP"  --  [1]+  */ 

/*  Initializing  Connection  »/ 

_lastlevel  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1858  "FDDI.MP"  — [2]!  TOKEN  */ 

/*  Tester  sends  the  Token  (a  Invalid  Symbol  in  ED) , 
pTOKEN  - T0KEN_T2  ()  ; 

Send_PDO_TOKEN (pTOKEN) ; 

_level  +“  1; 

_timername  - "TRT."; 
while  (TRUE)  { 

/*  line  1862  "FDDI.MP"  — [3]?  TOKEN_Strip  */ 

/*  PA,SD,FC  and  Idles  returned.  */ 
pTOKEN_Strip  - TOKEN_Strip_Rl  ()  ; 

_buffer  = Receive_PDU  (_timemame)  ; 
if  (Is_PDU_TOKEN_Strip(pTOKEN_Strip,  _buf fer) ) { 

_level  +=  1; 

SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  1868  "FDDI.MP"  — [3]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +=  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

/»  line  1871  "FDDI.MP"  — [3]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +=  1; 

SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

} /*  end  of  level  [3]  */ 

} /*  end  of  level  [2]  */ 

} 

_level  = _lastlevel; 
return  (FALSE) ; 

} /*  end  of  level  [1]  */ 


/* 

* DetectTokenEDl  — Testing  1 for  ED  of  Token 
*/ 
int 

DetectTokenEDl () 

{ 

int  _lastlevel; 

_time  - 0; 

_level  - 1; 
strcpy(R,  "NONE"); 

Result  - NONE; 

_timemame  - (char  *)  0; 

_bufferlen  - -1; 

/*  line  1879  "FDDI.MP"  --  [1]+  */ 

_last level  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +-  1; 
while  (TRUE)  { 

/*  line  1881  "FDDI.MP"  ~ [2]!  TOKEN  */ 

/*  Tester  sends  Token (an  Idle  Symbol  in  ED)  */ 
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*/ 


pTOKEN  - TOKEN_T3(}; 

Send_PDU_TOKEN(pTOKEN) ; 

_level  +-  1; 

_timername  “ "TRT."; 
while  (TRUE)  { 

/*  line  1885  "FDDI.MP"  — [3]?  TOKEN_Strip  */ 

/*  PA,  SD,  FC  and  Idles  returned.  */ 
pTOKEN_Strip  - TOKEN_Strip_Rl () ; 

_buffer  •“  Receive_PDU  (_timername)  ; 
if  (Is_PDU_TOKEN_Strip{pTOKEN_Strip,  _buf fer) ) { 

_level  +“  1; 

SetfVerdict  (PASS)  ; 
return  (FALSE) ; 

} 

/*  line  1891  "FDDI.MP"  — [3]?  OTHERWISE  */ 
if  (_buffer)  { 

_level  +“  1; 

SetfVerdict  (FAIL)  / 
return  (FALSE) ; 

} 

/*  line  1894  "FDDI.MP"  — [3]?  TIMEOUT  */ 
if  (Timeout ("TRT. ") ) { 

_level  +=  1; 

SetfVerdict  (FAIL)  ; 
return  (FALSE) ; 

} 

} /*  end  of  level  [3]  */ 

} /*  end  of  level  [2]  */ 

} 

_level  - _lastlevel; 
return  (FALSE) ; 

} /*  end  of  level  [1]  */ 


/* 

* DetectTo)cenED2  — Testing  2 for  the  ED  of  Token 
*/ 
int 

DetectTokenED2  () 

int  _la St level; 

_time  ••  0; 

_level  - 1; 
strcpy(R,  "NONE") ; 

Result  - NONE; 

_timername  - (char  *)  0; 

_bufferlen  - -1; 

/*  line  1902  "FDDI.MP"  — [1]+  */ 

_lastlevel  - _level; 
if  (INITCONNECT 0 ) 
return  (TRUE) ; 

else  if  (_level  > _lastlevel)  { 

_level  +-  1; 
while  (TRUE)  ( 

/*  line  1904  "FDDI.MP"  — [2]!  TOKEN  */ 

/*  Tester  sends  the  Token  (any  symbol (not  Idles  or  T)  in  ED)  */ 
pTOKEN  - TOKEN_T4 () ; 

Send_PDD_TOKEN (pTOKEN) ; 

_level  +-  1; 

_timername  - "TRT . " ; 
while  (TRUE)  { 

/*  line  1908  "FDDI.MP"  — [3]?  TOKEN_Strip  */ 

/*  PA,  SD,  FC  and  Idles  returned  */ 
pTOKEN_Strip  - TOKEN_Strip_Rl () ; 

_buffer  - Receive_PDD  (_timemame)  ; 
if  (Is_PDD_TOKEN_Strip(pTOKEN_Strip,  _buffer) ) { 
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_level  +-  1; 
SetfVerdict  (PASS)  ; 
return  (TRUE) ; 

} 

/*  line  1914  "FDDI.MP" 
if  (_buffer)  { 

_level  +-  1; 
SetfVerdict (FAIL) ; 
return  (TRUE) ; 

} 

/*  line  1917  "FDDI.MP" 
if  (Timeout ("TRT. ") ) { 

_level  +=  1; 
SetfVerdict  (FAIL)  ; 
return  (TRUE) ; 

} 

} 

} 

} 

_level  = _lastlevel; 
return  (FALSE) ; 

} 


— [3]?  OTHERWISE  */ 


— [3]?  TIMEOUT  */ 


/*  end  of  level  [3]  */ 
/*  end  of  level  [2]  */ 


/*  end  of  level  [1]  */ 


/* 

* INITCONNECT  — to  complete  ring  initialization  and  form  a ToJcen  path  for 

* test  cases 
*/ 

int 

INITCONNECT  () 

{ 

int  _lastlevel; 

/*  line  1927  "FDDI.MP"  — [1]  */ 

a = 0; 

_level  +=  1; 
return  (FALSE) ; 

} /*  end  of  level  [1]  */ 

/* 
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* ***Constraints  Declarations****  */ 
pdu__DATA  * 

DATA_T1 0 

{ 

bitcpy (DATA.PA,  5,  cvttobit  (" OxFFFFFFFFFFFFFFFFFFFF" , 80),  80) 
DATA.PA_tag  - 0; 

DATA.SD  - 0x311; 

DATA.SD_tag  - 0; 

DATA.FC  - Oxcl; 

DATA.FC_tag  - 0; 

DATA.  DA  •=»  Tester_Address; 

DATA . DA_t  ag  ■■  0 ; 

DATA.SA  - Tester_Address; 

DATA.SA_tag  - 0; 

bitcpy (DATA. INFO,  5,  cvttobit (" 0xF2 69552DCF" , 40),  40); 
DATA.INFO_tag  - 0; 

DATA.FCS  = M_FCS__Tramt; 

DATA.FCS_tag  - 0; 

DATA. ED  » 0x15; 

DATA.ED_tag  - 0; 

DATA.FS  = 0x294a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

} 

pdu_DATA  * 

DATA_R1 0 

{ 

DATA.PA  - 0; 

DATA.PA_tag  « 6; 

DATA.SD  » 0x311; 

DATA.SD_tag  - 0; 

DATA.FC  » Oxcl; 

DATA.FC_tag  =0; 

DATA. DA  -=  Tester_Address; 

DATA . DA_t  ag  - 0 ; 

DATA.SA  - Teste r_Addreas; 

DATA.SA_tag  0; 

bitcpy (DATA. INFO,  5,  cvttobit ("0xF269552DCF" , 40),  40); 
DATA.INFO_tag  - 0; 

DATA.FCS  - M_FCS_Rev; 

DATA.FCS_tag  - 0; 

DATA. ED  = 0x15; 

DATA.ED_tag  - 0; 

DATA.FS  - 0x294a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

) 

pdu_DATA  * 

DATA_T2 ( ) 

( 

bitcpy  (DATA.PA,  5,  cvttobit ("OxFFFFFFFFFFFFFFFFFFFF",  80),  80) 
DATA.PA_tag  - 0; 

DATA.SD  - 0x311; 

DATA.SD_tag  - 0; 

DATA.FC  - Oxcl; 

DATA.FC_tag  - 0; 

DATA. DA  - IDT_Address; 

DATA.DA_tag  - 0; 

DATA.SA  - Tester_Address; 

DATA.SA_tag  - 0; 

bitcpy (DATA. INFO,  5,  cvttobit ("0xF269552DCF" , 40),  40); 
DATA.INFO_tag  - 0; 

DATA.FCS  - M_FCS_Tramt; 

DATA.FCS_tag  - 0; 

DATA. ED  - 0x15; 

DATA.ED__tag  ->  0; 
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DATA.FS  - 0x2 94a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

} 

pdu_DATA  * 

DATA_R2 ( ) 

{ 

DATA. PA  * 0; 

DATA.PA_tag  - 6; 

DATA.SD  - 0x311; 

DATA.SD_tag  - 0; 

DATA.FC  = Oxcl; 

DATA.FC_tag  - 0; 

DATA. DA  = IUT_Address; 

D AT A . D A_t  a g - 0 ; 

DATA.SA  = Tester_Address; 

DATA.SA_tag  - 0; 

bit cpy (DATA. INFO,  5,  cvttobit (" 0xF2 69552DCF" , 40),  40); 

DATA. INFO_tag  - 0; 

DATA.FCS  - M_FCS_Rev; 

DATA.FCS_tag  - 0; 

DATA. ED  - 0x15; 

DATA . ED_t  ag  - 0 ; 

DATA.FS  •=  0x2  9 6b; 

DATA.F£_tag  “ 0; 
return  (&DATA) ; 

} 

pdu_DATA  * 

DATA_T3  0 
{ 

bit cpy (DATA. PA,  5,  cvttobit ("OxFFClFFFFFFFFFFFFFFFF",  80),  80) 
DATA.PA_tag  -=  0; 

DATA.SD  = 0x311; 

DATA.SD_tag  = 0; 

DATA.FC  =•  Oxcl; 

DATA.FC_tag  = 0; 

DATA. DA  - IDT_Address; 

DATA . DA_t  ag  - 0 ; 

DATA.SA  “ Tester_Address; 

DATA.SA_tag  - 0; 

bitcpy (DATA. INFO,  5,  cvttobit (" 0xF2 69552DCF" , 40),  40); 
DATA.INFO_tag  - 0; 

DATA.FCS  - M_FCS_Traint; 

DATA.FCS_tag  - 0; 

DATA. ED  - 0x15; 

DATA.ED_tag  - 0; 

DATA.FS  - 0x2 94a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

} 

pdu_DATA  * 

DATA_T4  0 
{ 

bitcpy (DATA. PA,  5,  cvttobit ("OxFFFFFFFFFFFFFFFFFFFF”,  80),  80) 
DATA . PA_t  ag  = 0 ; 

DATA.SD  - 0x300; 

DATA . SD_t  ag  * 0 ; 

DATA.FC  - Oxcl; 

DATA.FC_tag  - 0; 

DATA. DA  - IDT_Address; 

DATA.DA_tag  - 0; 

DATA.SA  “ Tester_Address; 

DATA.SA_tag  — 0; 

bitcpy (DATA. INFO,  5,  cvttobit  (”0xF269552DCF” , 40),  40); 
DATA.INFO_tag  - 0; 

DATA.FCS  - M FCS_Traint; 
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DATA.FCS_tag  - 0; 

DATA. ED  - 0x15; 

DATA.ED_tag  - 0; 

DATA.FS  - 0x2 94a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

} 

pdu_DATA  * 

DATA_T5  0 

bitcpy (DATA.PA,  5,  cvttobit ("OxFFFFFFFFFFFFFFFFFFFF",  80),  80) 
D AT A . P A_t  a g - 0 ; 

DATA.SD  - 0x311; 

DATA.SD_tag  - 0; 

DATA.FC  - Oxcl; 

DATA.FC_tag  - 0; 

DATA. DA  - IDT_Address; 

D AT  A . DA_t  a g 0 ; 

DATA.SA  “ Tester_Address; 

DATA . S A_t  ag  - 0 ; 

bitcpy (DATA. INFO,  5,  cvttobit  ("0xF029552DCF",  40),  40); 
DATA.INFO_tag  - 0; 

DATA.FCS  - M_FCS_Tramt; 

DATA.FCS_tag  - 0; 

DATA. ED  - 0x15; 

DATA.ED_tag  - 0; 

DATA.FS  - 0x294a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

} 

pdu_DATA  * 

DATA_T6  0 

{ 

bitcpy  (DATA.PA,  5,  cvttobit  ("OxFFFFFFFFFFFFFFFFFFFF" , 80),  80) 
DATA.PA_tag  - 0; 

DATA.SD  » 0x311; 

DATA . SD_t ag  - 0 ; 

DATA.FC  - Oxcl; 

DATA.FC_tag  - 0; 

DATA. DA  - IUT_Address; 

DATA . DA_t ag  - 0 ; 

DATA.SA  - Tester_Address; 

DATA.SA_tag  - 0; 

bitcpy (DATA. INFO,  5,  cvttobit  (" 0xF2 69552DCF" , 40),  40); 
DATA.INFO_tag  - 0; 

DATA.FCS  - M_FCS_Tramt; 

DATA.FCS_tag  - 0; 

DATA. ED  - 0x15; 

DATA.ED_tag  - 0; 

DATA.FS  - 0x280a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

) 

pdu_DATA  * 

DATA_T7_0  0 

( 

bitcpy  (DATA.PA,  5,  cvttobit  (''OxFFFFFFFFFFFFFFFFFFFF" , 80),  80) 
DATA . PA_t ag  “ 0 ; 

DATA.SD  - 0x31f; 

DATA.SD_tag  - 0; 

DATA.FC  - Oxcl; 

DATA.FC_tag  - 0; 

DATA. DA  - IDT_Address; 

DATA.DA_tag  - 0; 

DATA.SA  - Tester_Addreas; 

DATA.SA_tag  * 0; 
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bitcpy (DATA. INFO,  5,  cvttobit ("0xF269552DCF",  40),  40); 
DATA.INFO_tag  - 0; 

DATA.FCS  - M_FCS_Tramt; 

DATA.FCS_tag  - 0; 

DATA. ED  - 0x15; 

DATA.ED_tag  - 0; 

DATA.FS  - 0x2 94a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

} 

pdu_DATA  * 

DATA_T7_1 0 

{ 

bitcpy  (DATA. PA,  5,  cvttobit  (•’ OxFFFFFFFFFFFFFFFFFFFF" , 80),  80) 
DATA.PA_tag  “ 0; 

DATA.SD  •=  0x3fl; 

DATA.SD_tag  - 0; 

DATA.FC  - Oxcl; 

DATA.FC_tag  = 0; 

DATA. DA  ■=  IUT_Address; 

DATA.DA_tag  = 0; 

DATA.SA  = Tester_Address; 

DATA.SA_tag  = 0; 

bitcpy (DATA. INFO,  5,  cvttobit ("0xF269552DCF",  40),  40); 
DATA.INFO_tag  - 0; 

DATA.FCS  = M_FCS_Tramt; 

DATA.FCS_tag  = 0; 

DATA. ED  = 0x15; 

DATA.ED_tag  «•  0; 

DATA.FS  ■=  0x294a; 

DATA.FS_tag  = 0; 
return  (&DATA) ; 

} 

pdu_DATA  * 

DATA_T8  0 

{ 

bitcpy (DATA. PA,  5,  cvttobit (" OxFFFFFFFFFFFFFFFFFFFF" , 80),  80) 
DATA.PA_tag  - 0; 

DATA.SD  •=  0x311; 

DATA.SD_tag  « 0; 

DATA.FC  - 0x004; 

DATA.FC_tag  - 0; 

DATA . DA  * I UT_Addr e s s ; 

DATA.DA_tag  * 0; 

DATA.SA  = Tester_Address; 

DATA.SA_tag  -■  0; 

bitcpy (DATA. INFO,  5,  cvttobit  ("0xF2  69552DCF" , 40),  40); 

DATA. INFO_tag  - 0; 

DATA.FCS  - M_FCS_Traint; 

DATA.FCS_tag  - 0; 

DATA. ED  = 0x15; 

DATA.ED_tag  » 0; 

DATA.FS  = 0x2 94a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

} 

pdu_DATA  * 

DATA_T9  0 
{ 

bitcpy (DATA. PA,  5,  cvttobit ("OxFFFFFFFFFFFFFFFFFFFF",  80),  80) 
DATA.PA_tag  - 0; 

DATA.SD  - 0x311; 

DATA.SD_tag  - 0; 

DATA.FC  - Oxcl; 

DATA.FC_tag  - 0; 

DATA. DA  “ IDT_Address; 
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DATA.DA_tag  - 0; 

DATA.SA  - Tester_Address; 

DATA.SA_tag  - 0; 

bit cpy (DATA. INFO,  5,  cvttobit  (" 0xF7E9552DCF" , 40),  40); 
DATA.INFO_tag  - 0; 

DATA.FCS  - M_FCS_Tramt ; 

DATA.FCS_tag  « 0/ 

DATA. ED  - 0x15; 

DATA.ED_tag  - 0; 

DATA.FS  -=  0x2  94a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

) 

pdu_DATA  * 

DATA_T10  0 

{ 

bit cpy (DATA. PA,  5,  cvttobit (" OxFFFFFFFFFFFFFFFFFFFF" , 80),  80) 
DATA.PA_tag  - 0; 

DATA.SD  - 0x311; 

DATA.SD_tag  - 0; 

DATA.FC  - Oxcl; 

DATA.FC_tag  - 0; 

DATA. DA  = IUT_Address; 

DATA.DA__tag  -=  0; 

DATA.SA  - Tester_Address; 

DATA.SA_tag  * 0; 

bitcpy (DATA. INFO,  5,  cvttobit ("0xF569552DCF",  40),  40); 
DATA.INFO_tag  - 0; 

DATA.FCS  - M_FCS_Traint; 

DATA.FCS_tag  « 0; 

DATA. ED  •=  0x15; 

DATA . ED_t  ag  - 0 ; 

DATA.FS  - 0x2 94a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

) 

pdu_DATA  * 

DATA_T1 1_0  ( ) 

{ 

bitcpy (DATA. PA,  5,  cvttobit (" OxFFFFFFFFFFFFFFFFFFFF" , 80),  80) 
DATA . P A_t  ag  ■■  0 ; 

DATA.SD  - 0x311; 

DATA.SD__tag  - 0; 

DATA.FC  - Oxcl; 

DATA.FC_tag  - 0; 

DATA. DA  = IDT_Address; 

DATA.DA_tag  - 0; 

DATA.SA  -=  Tester_Address; 

DATA.SA_tag  - 0; 

bitcpy (DATA. INFO,  5,  cvttobit (" 0xF2 69552DCF" , 40),  40); 

DATA. INFO_tag  - 0; 

bitcpy (DATA.FCS,  5,  cvttobit ("0xF7BDEF7BDE" , 40),  40); 
DATA.FCS_tag  - 0; 

DATA. ED  - 0x15; 

DATA.ED_tag  - 0; 

DATA.FS  - 0x2 94a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

1 

pdu_DATA  * 

DATA_R11_0  0 

( 

DATA. PA  - 0; 

DATA.PA_tag  — 6 
DATA.SD  - 0x311 
DATA.SD_tag  0 
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DATA.FC  - Oxcl; 

DATA.FC_tag  - 0; 

DATA. DA  - IDT_Address; 

DATA . DA_t  ag  - 0 ; 

DATA.SA  - Tester_Address; 

DATA.SA_tag  “ 0; 

bit cpy (DATA. INFO,  5,  cvttobit  (" 0xF2 69552DCF" , 40),  40); 
DATA.  INFO_tag  >=  0; 

bit cpy (DATA. FCS,  5,  cvttobit ("0xF7BDEF7BDE" , 40),  40); 
DATA.FCS_tag  - 0; 

DATA. ED  - 0x15; 

DATA . ED_t  ag  « 0 ; 

DATA.FS  •=  0x2d6a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

} 

pdu_DATA  * 

DATA_T11_1 0 

{ 

bit cpy (DATA. PA,  5,  cvttobit (" OxFFFFFFFFFFFFFFFFFFFF" , 80), 
DATA . P A_t  ag  - 0 ; 

DATA.SD  -=  0x311; 

DATA.SD_tag  - 0; 

DATA.FC  = Oxcl; 

DATA.FC_tag  - 0; 

DATA.  DA  ••  Tester_Address; 

DATA . DA_t  a g * 0 ; 

DATA.SA  Tester_Address; 

DATA . SA_t  ag  - 0 ; 

bit cpy (DATA. INFO,  5,  cvttobit (" 0xF2 69552DCF" , 40),  40); 
DATA. INFO_tag  = 0; 

bit cpy (DATA. FCS,  5,  cvttobit ("0xF7BDEF7BDE" , 40),  40); 
DATA.FCS_tag  - 0; 

DATA. ED  = 0x15; 

DATA . ED_t  ag  ■■  0 ; 

DATA.FS  = 0x294a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

) 

pdu_DATA  * 

DATA_R1 1_1 ( ) 

{ 

DATA. PA  « 0; 

DATA.PA_tag  - 6; 

DATA.SD  -=  0x311; 

DATA.SD_tag  » 0; 

DATA.FC  = Oxcl; 

DATA.FC_tag  « 0; 

DATA. DA  “ Tester_Address; 

DATA.DA_tag  - 0; 

DATA.SA  - Tester_Address; 

DATA.SA_tag  » 0; 

bitcpy (DATA. INFO,  5,  cvttobit (" 0xF2 69552DCF" , 40),  40); 
DATA.INFO_tag  - 0; 

bitcpy (DATA. FCS,  5,  cvttobit ("0xF7BDEF7BDE" , 40),  40); 
DATA.FCS_tag  - 0; 

DATA. ED  - 0x15; 

DATA.ED_tag  « 0; 

DATA.FS  - 0x2 d4 a; 

DATA.FS_tag  - 0; 
return  (&DATA) ; 

} 

pdu_DATA_InvLen  * 

DATA_InvLen_Tl () 

{ 

DATA__InvLen.PA  - P 16;  172 
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DATA__InvLen .PA_tag  - 0; 

DATA_InvLen . SD  - 0x311; 

DATA_InvLen.SD_t.ag  - 0; 

DATA_InvLen.FC  - Oxcl; 

DATA_InvLen .FC_tag  - 0; 

DATA_InvLen . DA  - IDT_Address; 

DATA_InvLen • DA_tag  - 0; 

DATA_InvLen . SA  - Tester_Address ; 

DATA_InvLen . SA_tag  - 0; 

bitcpy  (DATA_InvLen.INFO,  5,  cvttobit  {"0xF269552DCF'' , 40),  40); 

DATA_InvLen . INFO_tag  - 0; 

DATA_InvLen.FCS  - M_FCS_Tramt; 

DATA_InvLen .FCS_tag  - 0; 

DATA_InvLen .ED  “ 0x15; 

DATA_InvLen .ED_tag  - 0; 

DATA_InvLen .FS  - 0x2 9 4a; 

DATA_InvLen .FS_tag  - 0; 
return  (&DATA_InvLen) ; 

} 

pdu_DATA_OverMaxLen  * 

DATA_OverMaxLen_Tl () 

bitcpy (DATA_OverMaxLen. PA,  5,  cvttobit ("OxFFFFFFFFFFFFFFFFFFFF",  80),  80) 
DATA_OverMaxLen  . PA_tag  *=  0; 

DATA_OverMaxLen . SD  = 0x311; 

DATA_OverMaxLen . SD_tag  - 0; 

DATA_OverMaxLen .FC  = Oxcl; 

DATA_OverMaxLen .FC_tag  - 0; 

DATA_OverMaxLen . DA  = IUT_Address; 

DATA_OverMaxLen . DA_tag  - 0; 

DATA_OverMaxLen . SA  - Tester_Address; 

DATA_OverMaxLen . SA_tag  - 0; 

bitcpy (DATA_OverMaxLen. INFO,  5,  cvttobit ("0xF269552DCF" , 40),  40); 
DATA_OverMaxLen . INFO_tag  - 0; 

DATA_OverMaxLen.FCS  - M_FCS_Tramt ; 

DATA_OverMaxLen .FCS_tag  * 0; 

DATA_OverMaxLen.ED  >=  0x15; 

DATA_OverMaxLen  .ED_tag  ■=  0; 

DATA_OverMaxLen .FS  - 0x2 9 4a; 

DATA_OverMaxLen .FS_tag  - 0; 
return  (&DATA_OverMaxLen) ; 

) 

pdu_TOKEN  * 

T0KEN_T1 0 

{ 

bitcpy (TOKEN. PA,  5,  cvttobit ("OxFFFFFFFFFFFFFFFFFFFF" , 80),  80); 

TOKEN. PA_tag  = 0; 

TOKEN. SD  - 0x311 
TOKEN. SD_tag  - 0 
TOKEN. FC  - 0x80; 

TOKEN. FC_tag  «•  0 
TOKEN. ED  - 0x2b5 
TOKEN. ED_tag  - 0 
return  (&TOKEN) ; 

1 

pdu_TOKEN  * 

T0KEN_R1 0 

( 

TOKEN. PA  - 0; 

TOKEN. PA_tag  - 6 
TOKEN. SD  - 0x311 
TOKEN. SD_tag  - 0 
TOKEN. FC  - 0x80; 

TOKEN.FC_tag  - 0 
TOKEN. ED  - 0x2b5 
TOKEN. ED_tag  - 0 
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return  ( i TOKEN); 


} 

pdu_TOKEN  * 

T0KEN_T2 { ) 

{ 

bitcpy (TOKEN. PA,  5,  cvttobit  ("OxFFFFFFFFFFFFFFFFFFFF" , 
TOKEN. PA_tag  » 0; 

TOKEN. SD  - 0x311; 

TOKEN.SD_tag  - 0; 

TOKEN. FC  - 0x80; 

TOKEN. FC_tag  - 0; 

TOKEN. ED  - 0x015; 

TOKEN. ED_tag  » 0; 
return  (& TOKEN) ; 

) 

pclu_TOKEN  * 

TOKEN_T3  0 

( 

bitcpy (TOKEN. PA,  5,  cvttobit ("OxFFFFFFFFFFFFFFFFFFFF" , 
TOKEN. PA_tag  - 0; 

TOKEN. SD  = 0x311; 

TOKEN. SD_tag  - 0; 

TOKEN. FC  = 0x80; 

TOKEN. FC_tag  - 0; 

TOKEN. ED  - 0x3f5; 

TOKEN. ED_tag  ■=  0; 
return  (& TOKEN) ; 

} 

pdu_TOKEN  * 

TOKEN_T4  0 

{ 

bitcpy (TOKEN. PA,  5,  cvttobit ( "OxFFFFFFFFFFFFFFFFFFFF" , 
TOKEN. PA_tag  = 0; 

TOKEN. SD  = 0x311; 

TOKEN. SD_tag  - 0; 

TOKEN. FC  - 0x80; 

TOKEN. FC_tag  - 0; 

TOKEN. ED  - 0x3d5; 

TOKEN. ED_tag  - 0; 
return  (& TOKEN) ; 

} 

pdu_CLAIM  * 

CLAIM_T1 0 

{ 

bitcpy (CLAIM. PA,  5,  cvttobit  ("OxFFFFFFFFFFFFFFFFFFFF" , 
CLAIM. PA_tag  - 0; 

CLAIM. SD  - 0x311; 

CLAIM. SD_tag  -=  0; 

CLAIM. FC  - 0xc3; 

CLAIM. FC_tag  - 0; 

CLAIM. DA  - IUT_Address; 

CLAIM. DA_tag  - 0; 

CLAIM. SA  = IDT_Address; 

CLAIM. SA_tag  - 0; 

CLAIM. INFO  - T_Req_IDT; 

CLAIM. INFO_tag  - 0; 

CLAIM. FCS  - M_FCS_TranTt; 

CLAIM. FCS_tag  = 0; 

CLAIM. ED  - 0x15; 

CLAIM. ED_tag  - 0; 

CLAIM. FS  - 0x294a; 

CLAIM. FS_tag  - 0; 
return  (& CLAIM) ; 

} 

pdu_CLAIM 
CLAIM  RIO 


80),  80) 


80),  80) 


80),  80) 


80),  80) 
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{ 


CLAIM. PA  - 0; 

CLAIM. PA_tag  - 6; 

CLAIM. SD  - 0x311; 

CLAIM. SD__tag  - 0; 

CLAIM. FC  “ 0xc3; 

CLAIM. FC__tag  - 0; 

CLAIM. DA  - IUT_Address; 

CLAIM. DA_tag  - 0; 

CLAIM. SA  - IUT_Address; 

CLAIM. SA_tag  - 0; 

CLAIM. INFO  - T_Req_IUT; 

CLAIM. INFO_tag  - 0; 

CLAIM. FCS  « M_FCS_Rev; 

CLAIM. FCS_tag  - 0; 

CLAIM. ED  - 0x15; 

CLAIM. ED_tag  - 0; 

CLAIM. FS  » 0x294a; 

CLAIM. FS_tag  - 0; 
return  (& CLAIM) ; 

} 

pdu_CLAIM  * 

CLAIM_T2 ( ) 

bitcpy (CLAIM. PA,  5,  cvttobit ("OxFFFFFFFFFFFFFFFFFFFF",  80),  80) 
CLAIM. PA_tag  - 0; 

CLAIM. SD  - 0x311; 

CLAIM. SD_tag  - 0; 

CLAIM. FC  “ 0xc3; 

CLAIM. FC_tag  - 0; 

CLAIM. DA  “ Tester_Address; 

CLAIM. DA_tag  - 0; 

CLAIM. SA  “ Tester_Address ; 

CLAIM. SA_tag  - 0; 

CLAIM.  INFO  •=  T_Bid_Max; 

CLAIM. INFO_tag  - 0; 

CLAIM. FCS  - M_FCS_Tramt; 

CLAIM. FCS_tag  - 0; 

CLAIM. ED  - 0x15; 

CLAIM. ED_tag  - 0; 

CLAIM. FS  - 0x2 94a; 

CLAIM. FS_tag  - 0; 
return  (&CLAIM) ; 

) 

pdu_CLAIM  * 

CLAIM_R2 ( ) 

{ 

CLAIM. PA  - 0; 

CLAIM. PA_tag  - 6; 

CLAIM. SD  - 0x311; 

CLAIM. SD_tag  - 0; 

CLAIM. FC  - 0xc3; 

CLAIM. FC_tag  - 0; 

CLAIM. DA  - Tester_Address; 

CLAIM. DA_tag  « 0; 

CLAIM. SA  “ Tester_Address ; 

CLAIM. SA_tag  - 0; 

CLAIM. INFO  “ T_Bid  Max; 

CLAIM. INFO_tag  - o7 
CLAIM. FCS  - M_FCS_Rev; 

CLAIM. FCS_tag  - 0; 

CLAIM. ED  - 0x15; 

CLAIM. ED_tag  - 0; 

CLAIM. FS  - 0x294a; 

CLAIM. FS_tag  - 0; 
return  (4CLAIM) ; 
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} 

pdu_CLAIM  * 

CLAIM_T3  {) 

{ 

bitcpy (CLAIM. PA,  5,  cvttobit ("OxFFFFFFFFFFFFFFFFFFFF" , 80),  80) 
CLAIM. PA_tag  - 0; 

CLAIM. SD  - 0x311; 

CLAIM. SD_tag  - 0; 

CLAIM. FC  - 0xc3; 

CLAIM. FC_tag  - 0; 

CLAIM. DA  - Tester_Address; 

CLAIM. DA_tag  - 0; 

CLAIM. SA  - Tester_Address; 

CLAIM. SA_tag  - 0; 

CLAIM. INFO  - T_Bid_Min; 

CLAIM. INFO_tag  - 0; 

CLAIM. FCS  ■»  M_FCS_Traint; 

CLAIM. FCS_tag  «=  0; 

CLAIM. ED  •=  0x15; 

CLAIM. ED_t.ag  » 0; 

CLAIM. FS  - 0x2 94a; 

CLAIM. FS_tag  - 0; 
return  (4 CLAIM)  ; 

) 

pdu_CLAIM  * 

CLAIM_T4  0 

bitcpy (CLAIM. PA,  5,  cvttobit ("OxFFFFFFFFFFFFFFFFFFFF",  80),  80) 
CLAIM. PA_tag  - 0; 

CLAIM. SD  =*  0x311; 

CLAIM. SD_tag  - 0; 

CLAIM. FC  - 0xc3; 

CLAIM. FC_tag  - 0; 

CLAIM. DA  * Tester_Address; 

CLAIM. DA_tag  - 0; 

CLAIM. SA  “ Tester_Address; 

CLAIM. SA_tag  « 0; 

CLAIM. INFO  - T_Req_Tester; 

^ CLAIM. INFO_tag  - 0; 

'claim. FCS  - M_FCS__Tramt; 

CLAIM. FCS_tag  - 0; 

CLAIM. ED  » 0x15; 

CLAIM. ED_tag  - 0; 

CLAIM. FS  = 0x294a; 

CLAIM. FS_tag  - 0; 
return  (& CLAIM) ; 

} 

pdu_CLAIM  * 

CLAIM_R4  0 

{ 

CLAIM. PA  - 0; 

CLAIM. PA_tag  - 6; 

CLAIM. SD  - 0x311; 

CLAIM. SD_tag  - 0; 

CLAIM. FC  - 0xc3; 

CLAIM. FC_tag  - 0; 

CLAIM. DA  - Tester_Address; 

CLAIM. DA_tag  - 0; 

CLAIM. S A - Tester_Address; 

CLAIM. SA_tag  - 0; 

CLAIM. INFO  - T_Req_Tester; 

CLAIM. INFO_tag  - 0; 

CLAIM. FCS  - M_FCS_Rev; 

CLAIM. FCS_tag  - 0; 

CLAIM. ED  - 0x15; 

CLAIM. ED_tag  - 0; 
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CLAIM. FS  - 0x294a; 

CLAIM. FS_tag  - 0; 
return  (& CLAIM) ; 

} ' " 

pdu_BEACON  * 

BEAC0N_T1 0 

bitcpy (BEACON. PA,  5,  cvttobit  (" OxFFFFFFFFFFFFFFFFFFFF” , 80),  80) 
BEACON. PA_tag  - 0; 

BEACON. SD  - 0x311; 

BEACON. SD_tag  - 0; 

BEACON. FC  - 0xc2; 

BEACON. FC_tag  - 0; 

bitcpy (BEACON. DA,  5,  cvttobit (" 0x000000000000" , 48),  48); 

BEACON. DA_tag  - 0; 

BEACON.  SA  «•  IUT_Address; 

BE:ACON.SA_tag  - 0; 

BEACON. INFO  - 0x00; 

BEACON. INFO_tag  - 0; 

BEACON. FCS  - M_FCS_Tramt; 

BEACON. FCS_t a g ■=  0; 

BEACON. ED  -=  0x15; 

BEACON. ED_tag  - 0; 

BEACON. FS  - 0x2 94a; 

BEACON. FS_tag  - 0; 
return  (& BEACON) ; 

} 

pdu_BEACON  * 

BEACON_Rl 0 

( 

BEACON. PA  *=  0; 

BEACON. PA_tag  - 6; 

BEACON. SD  = 0x311; 

BEACON. SD_tag  - 0; 

BEACON. FC  - 0xc2; 

BEACON. FC_tag  - 0; 

bitcpy (BEACON. DA,  5,  cvttobit  ("0x000000000000" , 48),  48); 

BEACON. DA_t a g - 0; 

BEACON. SA  - IDT_Address; 

BEACON. SA_t a g - 0; 

BEACON. INFO  - 0x00; 

BEACON. INFO_tag  - 0; 

BEACON. FCS  - M_FCS_Rev; 

BEACON. FCS_tag  - 0; 

BEACON. ED  - 0x15; 

BEACON. ED_tag  - 0; 

BEACON. FS  - 0x2 94a; 

BEACON. FS_tag  - 0; 
return  (&BEACON) ; 

1 

pdu_BEACON  * 

BEACON_T2  () 

{ 

bitcpy (BEACON. PA,  5,  cvttobit {" OxFFFFFFFFFFFFFFFFFFFF" , 80),  80) 
BEACON. PA_tag  - 0; 

BEACON. SD  - 0x311; 

BEACON. SD_tag  - 0; 

BEACON. FC  - 0xc2; 

BEACON. FC_tag  - 0; 

bitcpy (BEACON. DA,  5,  cvttobit  ("0x000000000000",  48),  48); 

BEACON. DA_tag  - 0; 

BEACON . SA  “ Tester_Address; 

BEACON. SA_tag  - 0; 

BEACON. INFO  - 0x00; 

BEACON. I NFO_tag  - 0; 

BEACON. FCS  - M_FCS_Trantt ; 
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BEACON . FCS_t a g - 0; 

BEACON. ED  - 0x15; 

BEACON. ED_tag  - 0; 

BEACON. FS  - 0x2 94a; 

BEACON. FS_tag  - 0; 
return  (&BEACON) ; 

} 

pdu_BEACON  * 

BEACON_R2 ( ) 

{ 

BEACON. PA  - 0; 

BEACON. PA_t a g - 6; 

BEACON. SD  » 0x311; 

BEACON. SD_tag  - 0; 

BEACON. FC  - 0xc2; 

BEACON. FC_tag  - 0; 

bit cpy (BEACON. DA,  5,  cvttobit  (" 0x000000000000" , 48),  48); 

BEACON. DA_t a g - 0; 

BEACON. SA  * Tester_Address; 

BEACON. SA_tag  - 0; 

BEACON. INFO  - 0x00; 

BEACON. INFO_tag  - 0; 

BEACON. FCS  - M_FCS_Rev; 

BEACON. FCS_t a g •=  0; 

BEACON. ED  » 0x15; 

BEACON. ED_tag  - 0; 

BEACON. FS  = 0x2 94a; 

BEACON. FS_tag  - 0; 
return  (& BEACON ) ; 

} 

pdu_ECHO_Req  * 

ECHO_Req_Tl  () 

{ 

bitcpy (ECHO_Req.PA,  5,  cvttobit (" OxFFFFFFFFFFFFFFFFFFFF" , 80),  80); 
ECHO_Req.PA_tag  -=  0; 

ECHO_Req.SD  = 0x311; 

ECHO_Req. SD_tag  = 0; 

ECHO_Req.FC  - 0x81; 

ECHO_Req. FC_tag  - 0; 

bitcpy (ECHO_Req. DA,  48,  IUT_Address,  32); 

ECHO_Req. DA_tag  *=0; 

bitcpy (ECHO_Req. SA,  48,  Tester_Address , 32); 

ECHO_Req. SA_tag  “ 0; 

ECHO_Req.Frame_Class  - 0x04; 

ECHO_Req.Fraine_Class_tag  - 0; 

ECHO_Req.Frame_Type  - 0x02; 

ECHO_Req. Frame_Type_tag  - 0; 

ECHO_Req.Version_ID  - 0x0000; 

ECHO_Req. Version_ID_tag  * 0; 

ECHO_Req. Transaction_ID  - 0x00000000; 

ECHO_Req. Transact ion_ID_tag  - 0; 

bitcpy (ECHO_Req. Station_ID,  64,  cvttobit ("0x0000000000000001" , 64),  64) 
ECHO_Req. Station_ID_tag  * 0; 

ECHO_Req.Pad  - 0x0000; 

ECHO_Req. Pad_tag  * 0; 

ECHO_Req.  InfoField_Length  -=  0xll6A; 

ECHO_Req. InfoField_L€ngth_tag  - 0; 

ECHO_Req.Paraineter_Type  - 0x0011; 

ECHO_Req.Parameter_Type_tag  “ 0; 

ECHO_Req.Parameter_Length  - 0x1168; 

ECHO_Req.Parameter_Length_tag  * 0; 

bitcpy (ECHO_Req.Echo_data,  9344,  cvttobit (" 0xF2 69 552DCF" , 40),  40); 
ECHO_Req.Echo_data_tag  ■ 0; 

ECHO_Req.FCS  - M_FCS_Tramt; 

ECHO_Req.FCS_tag  - 0; 

ECHO_Req.ED  - 0x15; 
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ECHO_Req.ED_tag  •=  0; 

ECHO_Req.FS  - 0x2 94a; 

ECHO_Req. FS_tag  ■■  0; 
return  (&ECHO_Req) ; 

} 

pdu_ECHO_Re  sp  * 

ECHO_Resp_Rl () 

{ 

ECHO_Resp.PA  - 0; 

ECHO_Resp.PA_tag  - 6; 

ECHO_Resp.SD  - 0x311; 

ECHO_Resp. SD_tag  - 0; 

ECHO_Resp.FC  - 0x81; 

ECHO_Resp.FC_tag  - 0; 

bitcpy (ECHO_Resp. DA,  48,  Tester_Address , 32); 

ECHO_Resp . DA_tag  - 0; 

bitcpy (ECHO_Resp. SA,  48,  IUT_Address,  32); 

ECHO_Resp . SA_tag  * 0; 

ECHO_Resp . Frame_Class  ■=  0x04; 

ECHO_Resp.Frame_Class_tag  - 0; 

ECHO_Resp.Frame_Type  - 0x03; 

ECHO_Resp.Frame_Type_tag  -=  0; 

ECHO_Resp. Version_ID  - 0x0000; 

ECHO_Resp . Version_ID_tag  •=  0; 

ECHO_Resp. Transact ion_ID  - 0x00000000; 

ECHO_Resp . Transaction_ID_tag  ■=  0; 

bitcpy (ECHO_Resp. Station_ID,  64,  cvttobit ("0x0000000000000001",  64),  64) 
ECHO_Resp.Station_ID_tag  - 0; 

ECHO_Resp.Pad  - 0x0000; 

ECHO_Resp.Pad_tag  - 0; 

ECH0_Resp. InfoField_Length  - 0x11 6A; 

ECH0_Resp . InfoField_Length_tag  - 0; 

ECH0_Resp .Parameter_Type  - 0x0011; 

ECHO_Resp.Parameter_Type_tag  0; 

ECHO_Resp.Parameter_Length  - 0x1168; 

ECH0_Resp  .Parameter_Length_tag  -«  0; 

bitcpy {ECHO_Resp.Echo_data,  9344,  cvttobit ("0xF269552DCF",  40),  40); 
ECHO_Resp.Echo_data_tag  - 0; 

ECHO_Resp.FCS  - M_FCS_Rev; 

ECHO_Resp.FCS_tag  * 0; 

ECHO_Resp.ED  - 0x15; 

ECH0_Resp .ED_tag  “ 0; 

ECHO_Resp.FS  - 0x294a; 

ECH0_Resp .FS_tag  - 0; 
return  (&ECH0_Resp) ; 

} 

pdu_ECHO_Resp  * 

ECH0_Re3p_Tl 0 

( 

bitcpy (ECH0_Re3p. PA,  5,  cvttobit ("OxFFFFFFFFFFFFFFFFFFFF" , 80),  80); 
ECHO_Resp.PA_tag  - 0; 

ECHO_Resp.SD  - 0x311; 

ECHO_Resp . SD_tag  “ 0; 

ECHO_Resp.FC  - 0x81; 

ECHO_Resp.FC_tag  - 0; 

bitcpy (ECH0_Re3p. DA,  48,  Tester_Address , 32); 

ECHO_Resp . DA_tag  ■ 0; 

bitcpy (ECH0_Re3p.SA,  48,  IUT_Address,  32); 

ECHO_Resp , SA_tag  « 0; 

ECHO_Resp .Frame_Class  •«  0x04; 

ECHO_Resp  .Fraine_Class_tag  * 0; 

ECH0_Re3p .Frame_Type  — 0x03; 

ECH0_Re3p .Fraine_Type_tag  ■ 0; 

ECHO_Resp.Version_ID  ■ 0x0000; 

ECHO_RGsp.Version_ID_tag  “ 0; 

ECH0_Re3p.Transaction_ID  -•  0x00000000; 
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64),  64) 


ECHO_Resp . Transaction_ID_tag  ■ 0; 

bitcpy (ECHO_Resp. Station_ID,  64 , cvttobit  ("0x0000000000000001", 
ECH0_Resp . Station_ID_tag  0; 

ECH0_Resp .Pad  » 0x0000; 

ECHO_Resp.Pad_tag  ■■  0; 

ECH0_Resp . Inf  oField_Lengt.h  » 0x11 6A; 

ECHO_Resp . Inf oField_Length_tag  - 0; 

ECH0_Resp .Parameter_Type  - 0x0011; 

ECH0_Resp .Parameter_Type_tag  » 0; 

ECH0_Resp .Parameter_Length  « 0x1168; 

ECHO_Resp.Parameter_Lengt.h_tag  - 0; 
bitcpy (ECHO_Resp.Echo_data,  9344,  cvttobit ("0xF269552DCF",  40),  40); 
ECH0_Resp .Echo_data_tag  - 0; 

ECHO_Resp.FCS  -=  M_FCS_Tramt; 

ECHO_Resp .FCS_tag  - 0; 

ECHO_Resp.ED  - 0x15; 

ECHO_Resp  .ED_tag  0; 

ECHO_Resp.FS  = 0x29 6b; 

ECKO_Resp.FS_tag  = 0; 
return  (&ECH0_Resp) ; 

) 

pdu__DATA_Strip  * 

DATA_Strtp_Rl  {) 

{ 

DATA_Strip.PA  •=  0; 

DATA_Strip.PA_tag  * 6; 

DATA_Strip. SD  = 0; 

DATA_Strip. SD_tag  « 8; 

DATA_Strip.FC  *=  0; 

DATA_Strip.FC_tag  “8; 

DATA_Strip.DA  - 0; 

D AT A_S t rip. DA_t  a g = 8 ; 

DATA_Strip.SA  = 0; 

DATA_Strip. SA_tag  - 8; 

DATA_St rip. INFO  - 0; 

DATA_Strip. INF0_tag  - 8; 

DATA_Strip.FCS  - 0; 

DATA_Strip.FCS_tag  - 8; 

DATA_Strip.ED  « 0; 

DATA_Strip.ED_tag  - 8; 

DATA_Strip.FS  - 0; 

DATA_Strip.FS_tag  - 8; 
return  (&DATA_Strip)  ; 

} 

pdu_DATA_Strip  * 

DATA_Strip_R2  () 

{ 

DATA_Strip.PA  - 0; 

DATA_Strip. PA_tag  - 6; 

DATA_Strip.SD  - 0x311; 

DATA_Strip. SD_tag  “0; 

DATA_Strip.FC  - Oxcl; 

DATA_Strip.FC_tag  * 0; 

DATA_Strip. DA  * IDT_Address; 

DATA_Strip. DA_tag  *0; 

DATA_Strip. SA  - Tester_Address; 

D AT A_S t rip. S A_t  a g - 0 ; 

DATA_St rip. INFO  - 0; 

DATA_Strip. INFO_tag  - 8; 

DATA_Strip.FCS  - 0; 

DATA_Strip.FCS_tag  - 8; 

DATA_St  r ip . ED  - 0; 

DATA_Strip.ED_tag  ■ 8; 

DATA_Strip.FS  - 0; 

DATA_Strip.FS_tag  - 8; 
return  (4DATA_Strip) ; 
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) 

pdu_DATA_Strip  * 

DATA_Strip_R3  () 

{ 

DATA_Strip.PA  ■ 0; 

DATA_Strip. PA_tag  - 6; 

DATA_Strip.SD  -=  0x311; 

DATA_Strip. SD_tag  - 0; 

DATA_Strip.FC  -=  Oxcl; 

DATA_Strip.FC_tag  - 0; 

DATA_Strip. DA  - IDT_Address; 

D ATA_S t rip. DA_t  a g - 0 ; 

DATA_Strip. SA  - Tester_Address; 

D AT A_S t rip. S A_t  a g - 0 ; 

bitcpy (DATA_Strip . INFO,  5,  cvttobit ("0xF269552DCF",  40),  40) 
DATA_Strip. INFO_tag  - 0; 

DATA_Strip.FCS  - M_FCS_Rev; 

DATA_Strip.FCS_tag  - 0; 

DATA_Strip.ED  - 0x15; 

DATA_Strip.ED_tag  -=  0; 

DATA_Strip.FS  - 0x2 d6 a; 

DATA_Strip.FS_tag  - 0; 
return  (&DATA_Strip) ; 

) 

pdu_DATA_Strip  * 

DATA_Strip_R4  () 

{ 

DATA_Strip.PA  - 0; 

DATA_Strip. PA_tag  ■=  6; 

DATA_Strip.SD  = 0x311; 

DATA_Strip.  SD_tag  0; 

DATA_Strip.FC  - Oxcl; 

DATA_Strip.FC_tag  0; 

DATA_Strip. DA  - IUT_Address; 

DATA_Strip. DA_tag  - 0; 

DATA_Strip. SA  - Tester_Address; 

DATA_Strip. SA_tag  « 0; 

bitcpy (DATA_St rip. INFO,  5,  cvttobit  (" 0xF2 69552DCF" , 40),  40) 
DATA_Strip.INFO_tag  - 0; 

DATA_Strip.FCS  - M_FCS_Rev; 

DATA_Strip.FCS_tag  = 0; 

DATA_Strip.ED  - 0x15; 

DATA_Strip. ED_tag  - 0; 

DATA_Strip.FS  - 0x2d6b; 

DATA_Strip.FS_tag  * 0; 
return  (&DATA_Strip) ; 

} 

pdu_DATA_Strip  * 

DATA_Strip_R5  () 

{ 

DATA_Strip.PA  - 0; 

DATA_Strip.PA_tag  - 6; 

DATA_Strip.SD  ■=  0x311; 

DATA_Strip. SD_tag  = 0; 

DATA_Strip.FC  - 0; 

DATA_Strip.FC_tag  - 8; 

DATA_Strip.DA  - 0; 

DATA_Strip. DA_tag  “ 8; 

DATA_Strip.SA  - 0; 

DATA_Strip. SA_tag  - 8; 

DATA_St rip. INFO  - 0; 

DATA_Strip.INFO_tag  - 8; 

DATA_Strip.FCS  - 0; 

DATA_Strip.FCS_tag  - 8; 

DATA_Strip.ED  - 0; 

DATA_Strip.ED_tag  - 8; 
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DATA_Strip.FS  - 0; 

DATA_Strip. FS_tag  - 8; 
return  (&DATA_Strip) ; 

} 

pdu_D AT A_S t rip  * 

DATA_Strip_R6  () 

{ 

DATA_Strip.PA  - 0; 

DATA_Strip. PA_tag  - 6; 
DATA_Strip.SD  - 0x311; 
DATA_Strip. SD_tag  - 0; 
DATA_Strip . FC  - Oxcl; 
DATA_Strip.FC_tag  - 0; 
DATA_Strip.  DA  *=  Tester_Address 
DATA_St  rip . DA_t ag  - 0 ; 
DATA_Strip.  SA  ■=  IDT_Address; 
DATA_St  rip . SA_t ag  “ 0 ; 

DATA_St rip. INFO  - 0; 
DATA_Strip. INFO_tag  = 8; 
DATA_Strip.FCS  - 0; 
DATA_Strip.FCS_tag  = 8; 
DATA_Strip.ED  « 0; 
DATA_Strip-ED_tag  - 8; 
DATA_Strip.FS  « 0; 
DATA_Strip.FS_tag  = 8; 
return  {&DATA_Strip) ; 

) 

pdu_TOKEN_Strip  * 

TOKEN_Strip_Rl () 

{ 

TOKEN_Strip.PA  = 0; 

TOKEN_Strip .PA_tag  = 6; 
TOKEN_Strip.SD  *=  0x311; 
TOKEN_Strip.SD_tag  » 0; 
TOKEN_Strip.FC  - 0x80; 
TOKEN_Strip.FC_tag  -0; 
TOKEN_Strip.ED  = 0; 
TOKEN_Strip.ED_tag  »=  8; 
return  (&TOKEN_Strip) ; 

) 

pdu_IDLE  * 

IDLE_I  0 

{ 

IDLE.Singleldle  - Oxlf; 

IDLE. Singleldle_tag  - 0; 
return  (&IDLE); 


Appendix  D 


FDDI  MAC  Conformance  Test 
Host  Specific  Library  Routines 


♦include  <stdio.h> 
♦include  <ctype.h> 
♦include  <sys/time.h> 
♦include  <sys/signal.h> 
♦include  "sysdef.h" 


struct  itimerval  ttime; 


long 

int 

extern  int 
extern  char 
extern  FILE 


tdur; 

_tiineout; 

*pint; 

lagptr; 

*fp; 


f lush_queue  () 

pint  - (int  *)  flagptr; 

*pint  - 256; 

while  (*pint  ~ 256); 


Start_timer  (tname,  dur) 
char  *tname; 

long  dur; 

( 

extern  wakeup  () ; 

printf ( "Start  timer  %s\n",  tname); 
fprintf (fp,  "Start  timer  %s\n",  tname); 
tdur  « dur; 

_timeout  -•  FALSE; 
signal  (SIGALRM,  wa)ceup)  ; 
ualarm(tdur  * 1000) ; 

} 

Timeout (oname) 

char  * oname; 

( 

return  timeout; 


Read_Timer (rname) 

char  * rname; 

( 


) 


printf  ("Read  timer  %s.\n",  mame)  ; 
fprintf (fp,  "Read  timer  %s.\n",  rname); 
getitimer  (ITIME1R._REAL,  fittime) ; 

return  (tdur  - ( (ttime . it_value .tv_sec  + ttime. it_value .tv_usec 
1000) ) ; , 


/ 1000000) 


* 


Camcel_Timer  () 

{ 

printf ("Cancel  timer\n"); 
fprintf (fp,  "Cancel  timerXn") ; 
ualarm(O)  ; 


wa)ceup  0 

{ 

_timeout  - TRUE; 

} 

bitcmp(strl,  azl,  atr2,  8z2) 
char  *strl,  *str2; 

int  szl,  8z2; 
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{ 


i,  j,  fs,  ss,  idnum; 
*fst,  *sst; 


int 

char 


if  (szl 

< sz2) 

{ 

f s - 

(szl  + 

7) 

/ 

8; 

ss 

(sz2  + 

7) 

/ 

8; 

idnum 

- 1; 

f St  - 

strl; 

SSt  •“ 

str2; 

} else 

{ 

f s - 

(sz2  + 

7) 

/ 

8; 

ss  - 

(szl  + 

7) 

/ 

8; 

idnum 

- -1; 

f St  - 

str2; 

SSt  -= 

strl; 

) 

for  (i 

= 0;  i 

< 

ss 

- 

if  (sst[i]) 

return  PM((0  - sst[i])  * idnum); 
for  (j  = i;  j < ss;  j++) 
if  (fst[j  - i]  !=  sst[j]) 

return  PM((fst[j  - i]  - sst[j])  * idnum); 
return  0; 


bitcpy (strl , 
char 
int 

{ 

int 

int 


sizel,  str2,  size2) 
*strl,  *str2; 
sizel,  size2; 

i,  j,  result; 
tmpl,  tmp2; 


tmpl  “ (sizel  + 7)  / 8; 
tmp2  * (size2  + 7)  / 8; 
if  (tmpl  < tmp2) 
result  »«  tmpl; 
else 

result  = tmp2; 

for  (i  -0;  i < result;  i++) 

strl [tmpl  - i - 1]  - str2 [tmp2  - i - 1]; 
for  (j  “ result;  j < tmpl;  j++) 
strl [tmpl  - j - 1]  * '\0'; 


unsigned  char  * 
cvttobit (hexnum,  hexsize) 
char  * hexnum; 

int  hexsize; 

{ 

unsigned  char  globhex[80]; 
int  trr^jint,  tmpsize; 

if  (strncmp (hexnum,  "Ox",  2))  { 
tmpsize  - (hexsize  + 7)  / 8; 
sscanf (hexnum,  "%d",  fitmpint) ; 
sprintf (hexnum,  "%0*x",  tmpsize,  tmpint); 
cnvrtfromhex (hexnum,  globhex,  hexsize); 

} else 

cnvrtfromhex (hexnum  + 2,  globhex,  hexsize); 
return  globhex; 


cnvrtfromhex (snum,  hexchar,  size) 
char  snum[]; 

\ansigned  char  hexchar []; 
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size; 


int 

{ 

int  i,  j,  k,  dgts,  niblt2]; 

dgts  - (size  + 7)  / 8; 

for  (i  - dgts  - 1,  j - strlen  (snum)  - 1;  (i  >-  0)  &&  (j  >-  0);  i — , j “ j - 2)  { 

for  (k  - 0;  k < 2;  k++)  ( 

if  ((k  — 1)  &&  (j  - k < 0))  ( 

nibl[l]  - 0; 
break; 

} 

if  ({snum[j  - k]  >-  ' 0' ) &&  (snum[j  - k]  <-  '9')) 
nibl[k]  - snum[j  - k]  - 'O'; 
else  { 

if  (islower (snum[ j - k] ) ) 

snum[j  - k]  - snum[j  - k)  - 'a'  + 'A'; 
if  ((snum[j  - k)  >-  'A')  &&  (snviin[j  - k]  <-  'F')) 
nibl[k]  * snum[j  - k]  - 'A'  + 10; 
else  { 

print f ("Bad  number.  Try  again. \n"); 
s canf ( " % s " , snum) ; 
i “ dgts; 

j = strlen (snum)  + 1; 
k - 2; 

} 

) 

1 

hexchar[i]  - nibl[0]  + 16  * nibl[l]; 

) 

for  (j  - i;  j >“  0;  j — ) 
hex char [j]  “ 0; 

} 

SetpVerdict (pverd) 

_verdict  pverd; 

{ 

if  ( (Result  -=  NONE)  | 1 (Result  -=•=  PASS) ) 

Result  - pverd; 

else  if  ( (pverd  — FAIL)  | | (pverd  — INCONC) ) 

Result  “ pverd; 
else 

print f ("Verdict  not  accpetableXn" ) ; 
fprintf (fp,  "Verdict  not  accpetableXn" ) ; 
switch  (Result)  { 
case  NONE: 

strcpy(R,  "NONE") ; 
break; 
case  FAIL: 

strcpy(R,  "FAIL") ; 
break; 
case  PASS: 

strcpy(R,  "PASS") ; 
break; 

case  INCONC: 

strcpy (R,  " INCONCLUSIVE" ) ; 
break; 

} 

) 

SetfVerdict (fverd) 

_verdict  fverd; 

{ 

if  (fverd  !-  RESULT) 

if  ((Result  — NONE)  ||  (Result  — PASS)) 

Result  ■ fverd; 
else  if  (fverd  — FAIL) 
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Result  - fyerd; 

else  if  ((Result  — INCONC)  &&  (fverd  — INCONC) ) ; 
else  { 

printf ( "Illegal  verdict \n") / 
fprintf (fp,  "Illegal  verdict \n"); 

} 

else  if  (Result  NONE)  { 
printf ("Illegal  verdict \n" ) ; 
fprintf (fp,  "Illegal  verdict \n"); 

} 

} 

/* 

* print_verdict  — output  a message  and  the  final  verdict  on  the  test  log. 

★ 

*/ 

print_verdict (message) 
char  *message; 

{ 

printf ("%s  — ",  message); 
fprintf (fp,  "%s  — ",  message); 
switch  (Result)  { 
case  NONE: 

printfC'No  verdict.  \n"); 
fprintf (fp,  "No  verdict . \n" ) ; 
brea)c; 
case  FAIL: 

printf ("Test  Failed. \h"); 
fprintf (fp,  "Test  Failed. \n"); 
brea)c; 
case  PASS: 

printf ("Test  Passed. \n"); 
fprintf (fp,  "Test  Passed. \n"); 
brea)c; 

case  INCONC: 

printf ("Verdict  is  inconclusive . \n" ) ; 
fprintf (fp,  "Verdict  is  inconclusive. \n") ; 
brea)c; 

} 

} 

/* 

* Implicit_send  — output  a message  to  operator  console  instructing  the 

* tests  operator  to  initiate  manual  operations  on  the  lUT. 

*/ 

In:^licit_send  (message) 
char  *message; 

{ 

printf ("Test  coordination,  force  lUT  to  send  %s\n",  message); 
fprintf (fp,  "Test  coordination,  force  lUT  to  send  %s\n",  message); 

} 

/* 

* Output_trace  — Print  a message  on  the  test  trace  log. 

* 

*/ 

Output_trace (message) 

char  *message; 

{ 

printf ("%s\n" , message);  /*  output  to  console  */ 

fprintf (fp,  "%s\n",  message);  /*  output  to  file  */ 

) 
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